Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
x
authorClaus Gittinger <cg@exept.de>
Tue, 29 Nov 2011 11:21:52 +0100
changeset 10911 c459d7c1a749
parent 10910 0d207c02ed40
child 10912 a90f6de79d36
x
BookmarkList.st file | annotate | diff | comparison | revisions 
--- a/BookmarkList.st	Tue Nov 29 11:20:58 2011 +0100
+++ b/BookmarkList.st	Tue Nov 29 11:21:52 2011 +0100
@@ -177,16 +177,17 @@
     | file  |
     file := Filename defaultDirectory / 'browser-bookmarks.rc'.
     BrowserBookmarks := self readFromFile: file onError:[nil].
-    BrowserBookmarks ifNotNil:[^self].    
+    BrowserBookmarks notNil ifTrue:[^self].    
 
     file := Filename homeDirectory / '.smalltalk' / 'browser-bookmarks.rc'.
     BrowserBookmarks := self readFromFile: file onError:[nil].
-    BrowserBookmarks ifNotNil:[^self].    
+    BrowserBookmarks notNil ifTrue:[^self].    
 
     BrowserBookmarks := self new fileName: file pathName.
 
     "Created: / 23-05-2011 / 10:06:50 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 23-05-2011 / 16:35:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 29-11-2011 / 11:21:06 / cg"
 !
 
 initializeWebBookmarks
@@ -194,15 +195,16 @@
     | file  |
     file := Filename defaultDirectory / 'web-bookmarks.rc'.
     WebBookmarks := self readFromFile: file onError:[nil].
-    WebBookmarks ifNotNil:[^self].    
+    WebBookmarks notNil ifTrue:[^self].    
 
     file := Filename homeDirectory / '.smalltalk' / 'web-bookmarks.rc'.
     WebBookmarks := self readFromFile: file onError:[nil].
-    WebBookmarks ifNotNil:[^self].    
+    WebBookmarks notNil ifTrue:[^self].    
 
     WebBookmarks := self new fileName: file pathName.
 
     "Created: / 08-06-2011 / 12:15:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 29-11-2011 / 11:21:10 / cg"
 !
 
 initializeWorkspaceBookmarks
@@ -210,11 +212,11 @@
     | file  |
     file := Filename defaultDirectory / 'workspace-bookmarks.rc'.
     WorkspaceBookmarks := self readFromFile: file onError:[nil].
-    WorkspaceBookmarks ifNotNil:[^self].    
+    WorkspaceBookmarks notNil ifTrue:[^self].    
 
     file := Filename homeDirectory / '.smalltalk' / 'workspace-bookmarks.rc'.
     WorkspaceBookmarks := self readFromFile: file onError:[nil].
-    WorkspaceBookmarks ifNotNil:[^self].    
+    WorkspaceBookmarks notNil ifTrue:[^self].    
 
     WorkspaceBookmarks := self new fileName: file pathName.
     WorkspaceBookmarks root add: 
@@ -233,6 +235,7 @@
 
     "Created: / 20-06-2011 / 22:10:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 21-06-2011 / 08:46:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 29-11-2011 / 11:21:16 / cg"
 ! !
 
 !BookmarkList methodsFor:'accessing'!
@@ -378,7 +381,7 @@
 !BookmarkList class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/BookmarkList.st,v 1.3 2011-11-18 13:33:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BookmarkList.st,v 1.4 2011-11-29 10:21:52 cg Exp $'
 !
 
 version_SVN
hg/stx-libtool