--- a/PopUpList.st	Wed Mar 19 17:41:13 1997 +0100
+++ b/PopUpList.st	Wed Mar 19 18:07:29 1997 +0100
@@ -892,14 +892,14 @@
         value := values at:anIndex
     ].
 
-    model isNil ifTrue:[
+"/    model isNil ifTrue:[
         "/ if there is a model,
         "/ the update will change my logo ...
 
         self sizeFixed:true.
         label := menu labels at:anIndex.
         super label:label printString.
-    ].
+"/    ].
 
     (model notNil and:[changeMsg notNil]) ifTrue:[
         "/
@@ -929,11 +929,11 @@
         menuAction value:value.
     ].
 
-    "Modified: 1.3.1997 / 02:13:07 / cg"
+    "Modified: 19.3.1997 / 17:59:04 / cg"
 ! !
 
 !PopUpList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/PopUpList.st,v 1.48 1997-03-05 16:09:02 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/PopUpList.st,v 1.49 1997-03-19 17:07:29 cg Exp $'
 ! !