--- a/Bookmark.st	Fri Nov 25 22:02:25 2011 +0100
+++ b/Bookmark.st	Tue Nov 29 11:20:58 2011 +0100
@@ -493,10 +493,11 @@
 
     | cls |
     cls :=  Smalltalk at: className asSymbol.
-    cls ifNotNil:[icon := SystemBrowser iconForClass: cls].
+    cls notNil ifTrue:[icon := SystemBrowser iconForClass: cls].
 
     "Created: / 05-05-2011 / 23:01:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 30-06-2011 / 19:10:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 29-11-2011 / 11:20:52 / cg"
 !
 
 initializeLabel
@@ -899,7 +900,7 @@
 !Bookmark class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Bookmark.st,v 1.7 2011-11-18 13:33:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Bookmark.st,v 1.8 2011-11-29 10:20:58 cg Exp $'
 !
 
 version_SVN