--- a/EditFieldWithCompletion.st	Tue Nov 29 11:21:54 2011 +0100
+++ b/EditFieldWithCompletion.st	Tue Nov 29 11:27:19 2011 +0100
@@ -331,20 +331,20 @@
 !
 
 hideOptionsWindow
-    optionsWindow
-        ifNotNil:[
-            optionsWindow destroy.
-            optionsWindow := nil.
-        ]
+    optionsWindow notNil ifTrue:[
+        optionsWindow destroy.
+        optionsWindow := nil.
+    ]
 
     "Created: / 08-08-2009 / 23:23:45 / Jan Vrany <vranyj1@fel.cvut.cz>"
     "Modified: / 09-08-2009 / 09:00:00 / Jan Vrany <vranyj1@fel.cvut.cz>"
+    "Modified: / 29-11-2011 / 11:27:03 / cg"
 !
 
 showOptionsWindow
 
     showOptions ifFalse:[^ self].
-    optionsWindow ifNotNil:[ ^ self ].
+    optionsWindow notNil ifTrue:[ ^ self ].
 
     optionsView := SelectionInListModelView new
                     textStartLeft: textStartLeft - 2;
@@ -385,6 +385,7 @@
     "Created: / 09-08-2009 / 08:12:21 / Jan Vrany <vranyj1@fel.cvut.cz>"
     "Modified: / 09-08-2009 / 09:28:47 / Jan Vrany <vranyj1@fel.cvut.cz>"
     "Modified: / 09-12-2010 / 22:05:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 29-11-2011 / 11:27:13 / cg"
 !
 
 startCompletion
@@ -398,7 +399,7 @@
 !EditFieldWithCompletion class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/EditFieldWithCompletion.st,v 1.4 2011-11-20 08:42:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/EditFieldWithCompletion.st,v 1.5 2011-11-29 10:27:19 cg Exp $'
 !
 
 version_SVN