*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Mon, 25 Oct 2004 12:32:11 +0200
changeset 6111 882fcaf124b4
parent 6110 7752328f17af
child 6112 9e6d59d829f6
*** empty log message ***
FileBrowserV2.st
NewSystemBrowser.st
Tools__NewSystemBrowser.st
--- a/FileBrowserV2.st	Mon Oct 25 12:06:50 2004 +0200
+++ b/FileBrowserV2.st	Mon Oct 25 12:32:11 2004 +0200
@@ -191,7 +191,7 @@
 !FileBrowserV2 class methodsFor:'class initialization'!
 
 applicationIcon
-    ^ NewLauncher startNewFileBrowserIcon
+    ^ [ NewLauncher startNewFileBrowserIcon ]
 !
 
 initialize
@@ -1604,7 +1604,7 @@
 !FileBrowserV2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.127 2004-10-19 16:19:07 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.128 2004-10-25 10:31:30 cg Exp $'
 ! !
 
 FileBrowserV2 initialize!
--- a/NewSystemBrowser.st	Mon Oct 25 12:06:50 2004 +0200
+++ b/NewSystemBrowser.st	Mon Oct 25 12:32:11 2004 +0200
@@ -108,7 +108,7 @@
 
     action := [NewSystemBrowser open].
 
-    icon := NewLauncher startNewSystemBrowserIcon. "/ self defaultIcon magnifiedTo:28@28.
+    icon := [NewLauncher startNewSystemBrowserIcon]. "/ self defaultIcon magnifiedTo:28@28.
 
     menuItem := MenuItem new 
                     value: action;
@@ -36329,7 +36329,7 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.794 2004-10-18 10:37:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.795 2004-10-25 10:32:11 cg Exp $'
 ! !
 
 NewSystemBrowser initialize!
--- a/Tools__NewSystemBrowser.st	Mon Oct 25 12:06:50 2004 +0200
+++ b/Tools__NewSystemBrowser.st	Mon Oct 25 12:32:11 2004 +0200
@@ -108,7 +108,7 @@
 
     action := [NewSystemBrowser open].
 
-    icon := NewLauncher startNewSystemBrowserIcon. "/ self defaultIcon magnifiedTo:28@28.
+    icon := [NewLauncher startNewSystemBrowserIcon]. "/ self defaultIcon magnifiedTo:28@28.
 
     menuItem := MenuItem new 
                     value: action;
@@ -36329,7 +36329,7 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.794 2004-10-18 10:37:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.795 2004-10-25 10:32:11 cg Exp $'
 ! !
 
 NewSystemBrowser initialize!