--- a/BookmarkMenuBuilder.st	Tue Nov 29 11:21:52 2011 +0100
+++ b/BookmarkMenuBuilder.st	Tue Nov 29 11:21:54 2011 +0100
@@ -132,13 +132,14 @@
 
     label := anObject label.
     icon := anObject icon.
-    icon ifNotNil:[ label := LabelAndIcon label:label icon:icon ].
+    icon notNil ifTrue:[ label := LabelAndIcon label:label icon:icon ].
     item := (MenuItem labeled:label)
                 value:#switchToBookmarkEntry:;
                 argument:anObject.
     ^ item
 
     "Created: / 21-06-2011 / 07:55:50 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 29-11-2011 / 11:21:20 / cg"
 ! !
 
 !BookmarkMenuBuilder methodsFor:'visiting'!
@@ -193,7 +194,7 @@
 !BookmarkMenuBuilder class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/BookmarkMenuBuilder.st,v 1.5 2011-08-08 16:23:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BookmarkMenuBuilder.st,v 1.6 2011-11-29 10:21:54 cg Exp $'
 !
 
 version_SVN