EditField.st
changeset 343 a7b6fbfdc453
parent 333 f1c500f177d8
child 392 81343306d796
--- a/EditField.st	Fri Feb 09 19:59:17 1996 +0100
+++ b/EditField.st	Fri Feb 09 21:31:29 1996 +0100
@@ -1356,13 +1356,13 @@
     "/ giving me the focus is loke clicking on me
     "/ (tell my enterFieldGroup ....
 
-    enabled ifTrue:[
+    (enabled or:[explicit]) ifTrue:[
         clickAction notNil ifTrue:[clickAction value:self].
         self showCursor.
         super showFocus:explicit
     ]
 
-    "Modified: 9.2.1996 / 01:45:58 / cg"
+    "Modified: 9.2.1996 / 20:49:48 / cg"
 ! !
 
 !EditField methodsFor:'initialization'!
@@ -1590,5 +1590,5 @@
 !EditField class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.45 1996-02-09 01:10:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.46 1996-02-09 20:31:29 cg Exp $'
 ! !