ComboView.st
changeset 6088 1b000948eeda
parent 6040 a3296ee359af
child 6089 22ddbc8a51d7
--- a/ComboView.st	Tue Jul 16 16:41:00 2019 +0200
+++ b/ComboView.st	Fri Jul 19 10:42:36 2019 +0200
@@ -538,7 +538,7 @@
 
     |msg|
 
-    (enableChannel isNil or:[enableChannel value]) ifTrue:[
+    (self enabled) ifTrue:[
         msg := #enable
     ] ifFalse:[
         msg := #disable
@@ -555,8 +555,9 @@
     ].
     pullDownButton perform:msg ifNotUnderstood:nil.
 
-    "Modified: / 22.2.1999 / 00:47:46 / cg"
-    "Modified: / 30.3.1999 / 14:17:10 / stefan"
+    "Modified: / 22-02-1999 / 00:47:46 / cg"
+    "Modified: / 30-03-1999 / 14:17:10 / stefan"
+    "Modified: / 19-07-2019 / 10:41:56 / Claus Gittinger"
 !
 
 handlesMouseWheelMotion:event inView:aView