--- a/PopUpList.st	Fri Feb 28 13:54:33 1997 +0100
+++ b/PopUpList.st	Fri Feb 28 15:21:19 1997 +0100
@@ -613,19 +613,17 @@
         ^ self
     ].
     changedObject == model ifTrue:[
-        (something == aspectMsg 
-        or:[something == #selectionIndex]) ifTrue:[
+        aspectMsg notNil ifTrue:[
             self getSelectionFromModel.
-            ^ self
         ].
-        something == listMsg ifTrue:[
+        listMsg notNil ifTrue:[
             self getListFromModel.
         ].
         ^ self
     ].
     super update:something with:aParameter from:changedObject
 
-    "Modified: 26.2.1997 / 18:23:27 / cg"
+    "Modified: 28.2.1997 / 15:18:58 / cg"
 ! !
 
 !PopUpList methodsFor:'drawing'!
@@ -914,5 +912,5 @@
 !PopUpList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/PopUpList.st,v 1.43 1997-02-28 12:54:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/PopUpList.st,v 1.44 1997-02-28 14:21:19 cg Exp $'
 ! !