--- a/Launcher.st Wed Oct 16 01:35:39 1996 +0200
+++ b/Launcher.st Wed Oct 16 13:46:26 1996 +0200
@@ -2180,8 +2180,8 @@
box := ListSelectionBox new.
box noEnterField.
box list:nameList.
- box label:'view selection'.
- box title:'select a view to raise deiconified:'.
+ box label:(resources string:'view selection').
+ box title:(resources string:'select a view to raise deiconified:') withCRs.
box action:[:selection |
|v|
@@ -2192,7 +2192,7 @@
box showAtPointer.
"Created: 15.10.1996 / 12:43:06 / cg"
- "Modified: 15.10.1996 / 12:51:49 / cg"
+ "Modified: 16.10.1996 / 12:41:39 / cg"
!
fullScreenHardcopy
@@ -3546,5 +3546,5 @@
!Launcher class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.197 1996-10-15 11:54:10 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.198 1996-10-16 11:46:26 cg Exp $'
! !