--- a/PopUpMenu.st	Wed Jun 04 14:38:35 2014 +0200
+++ b/PopUpMenu.st	Wed Jun 04 14:38:42 2014 +0200
@@ -1216,7 +1216,8 @@
     aMenu hideOnLeave:true.
 "
     menuView subMenuAt:indexOrName put:aMenu.
-    (aMenu notNil and:[aMenu isBlock not]) ifTrue:[
+    (aMenu notNil and:[aMenu isBlock not]
+    ) ifTrue:[
         "tell the submenu to notify me when action is performed"
         aMenu superMenu:self.
     ].
@@ -1686,10 +1687,10 @@
 !PopUpMenu class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.115 2014-02-18 15:04:30 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.116 2014-06-04 12:38:42 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.115 2014-02-18 15:04:30 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.116 2014-06-04 12:38:42 cg Exp $'
 ! !