--- 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 $'
! !