--- a/BookmarkBar.st Thu Nov 17 21:06:49 2011 +0100
+++ b/BookmarkBar.st Fri Nov 18 14:33:16 2011 +0100
@@ -393,14 +393,18 @@
!BookmarkBar methodsFor:'hooks'!
commonPostOpen
+ |bh|
super commonPostOpen.
- self bookmarksHolder value ifNil:
- [self bookmarksHolder value: BookmarkList forSystemBrowser].
+ bh := self bookmarksHolder.
+ bh value isNil ifTrue:[
+ bh value: BookmarkList forSystemBrowser
+ ].
self updateMenu.
"Created: / 18-05-2011 / 18:58:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
"Modified: / 02-06-2011 / 19:51:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 18-11-2011 / 14:31:54 / cg"
!
postBuiltStarButton:aButton
@@ -429,14 +433,15 @@
!
menuAddBookmarkTo: folder
+ | bookmark |
- | bookmark |
bookmark := self bookmarkHolder value.
- bookmark ifNil:[^self].
+ bookmark isNil ifTrue:[^self].
folder add: bookmark.
self bookmarksHolder value save.
"Created: / 02-06-2011 / 22:17:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 18-11-2011 / 14:32:07 / cg"
!
menuOpenBookmarkEditor
@@ -451,7 +456,7 @@
!BookmarkBar class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/BookmarkBar.st,v 1.4 2011-07-08 09:40:12 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/BookmarkBar.st,v 1.5 2011-11-18 13:33:16 cg Exp $'
!
version_SVN