SelectionInHierarchyView.st
branchjv
changeset 5197 4c7442c47ab5
parent 4770 6634b540fea2
parent 5160 c946616ee338
equal deleted inserted replaced
5136:4da82b9b74bc 5197:4c7442c47ab5
   376 ! !
   376 ! !
   377 
   377 
   378 !SelectionInHierarchyView methodsFor:'updating'!
   378 !SelectionInHierarchyView methodsFor:'updating'!
   379 
   379 
   380 update: aSymbol with:aParameter from:changedObject
   380 update: aSymbol with:aParameter from:changedObject
   381       "Change my apperance according to the occurred change."
   381       "Change my appearance according to the occurred change."
   382 
   382 
   383      aSymbol==#list
   383      aSymbol == #list
   384 	ifTrue: [^self setNewList].
   384         ifTrue: [^self setNewList].
   385      aSymbol==#selection
   385      aSymbol == #selection
   386 	ifTrue: [^self selection: self getSelectionFromModel].
   386         ifTrue: [^self selection: self getSelectionFromModel].
   387      aSymbol==#attributes
   387      aSymbol == #attributes
   388 	ifTrue: [].
   388         ifTrue: [].
   389 
   389 
   390 	"Modified: 10.10.94 / 16:13:38 / W.Olberding"
   390         "Modified: 10.10.94 / 16:13:38 / W.Olberding"
   391 ! !
   391 ! !
   392 
   392 
   393 !SelectionInHierarchyView class methodsFor:'documentation'!
   393 !SelectionInHierarchyView class methodsFor:'documentation'!
   394 
   394 
   395 version
   395 version
   396     ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInHierarchyView.st,v 1.12 2006-11-13 16:11:31 cg Exp $'
   396     ^ '$Header$'
   397 ! !
   397 ! !
   398 
   398