BookmarkMenuBuilder.st
branchjv
changeset 12125 0c49a3b13e43
parent 12123 4bde08cebd48
child 12128 a7ff7d66ee85
--- a/BookmarkMenuBuilder.st	Sun Jan 29 12:56:58 2012 +0000
+++ b/BookmarkMenuBuilder.st	Sun Jan 29 15:33:37 2012 +0000
@@ -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,9 +194,9 @@
 !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
     ^ '$Id$'
-! !
\ No newline at end of file
+! !