*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Wed, 13 Jul 2005 17:44:48 +0200
changeset 6353 b9e2940b7714
parent 6352 1dfde810826f
child 6354 08a483e3beda
*** empty log message ***
SystemBrowser.st
WorkspaceApplication.st
--- a/SystemBrowser.st	Wed Jul 13 17:42:44 2005 +0200
+++ b/SystemBrowser.st	Wed Jul 13 17:44:48 2005 +0200
@@ -5093,7 +5093,7 @@
 
     resources := self classResources.
 
-    enterBox := EnterBox title:(self classResources at:'Browse which class:') withCRs.
+    enterBox := EnterBox title:(self classResources stringWithCRs:'Browse which class:').
     enterBox okText:(resources at:'browse').
     enterBox entryCompletionBlock:[:contents |
         |s what m|
@@ -5324,7 +5324,7 @@
 !SystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SystemBrowser.st,v 1.218 2005-07-05 09:42:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SystemBrowser.st,v 1.219 2005-07-13 15:44:48 cg Exp $'
 ! !
 
 SystemBrowser initialize!
--- a/WorkspaceApplication.st	Wed Jul 13 17:42:44 2005 +0200
+++ b/WorkspaceApplication.st	Wed Jul 13 17:44:48 2005 +0200
@@ -1358,7 +1358,7 @@
     (workspaces contains:[:aView | self isModifiedWorkspace:aView]) ifFalse:[^ true].
 
     (Dialog 
-        confirm:(resources string:question) withCRs
+        confirm:(resources stringWithCRs:question)
         yesLabel:(resources at:yesButtonText)
         noLabel:(resources at:'Cancel'))
     ifTrue:[
@@ -1438,5 +1438,5 @@
 !WorkspaceApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.101 2005-06-21 14:37:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.102 2005-07-13 15:43:57 cg Exp $'
 ! !