ComboListView.st
changeset 6098 9f1f13deedde
parent 5816 7876c07931a7
child 6136 529ac7a8ba7d
--- a/ComboListView.st	Thu Jul 25 14:02:11 2019 +0200
+++ b/ComboListView.st	Tue Jul 30 16:41:02 2019 +0200
@@ -589,6 +589,11 @@
 
     |idx searchKey startIndex|
 
+    self enabled ifFalse:[
+        "do not change my value if I am disbaled"
+        ^ self
+    ].
+
     list notEmptyOrNil ifTrue:[
         key == #CursorDown ifTrue:[
             self deltaSelect:1.
@@ -616,6 +621,8 @@
     ].
 
     ^ super keyPress:key x:x y:y
+
+    "Modified: / 30-07-2019 / 16:39:52 / Stefan Reise"
 ! !
 
 !ComboListView methodsFor:'focus handling'!