# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1342772573 -7200
# Node ID fb8ca9aad4a373854fcf0cc17bd1e88a7982a1b3
# Parent  919aac038447f475cbe1d89813e69ce3b4c931c3
changed: #renameWorkspace:

diff -r 919aac038447 -r fb8ca9aad4a3 MultiViewToolApplication.st
--- a/MultiViewToolApplication.st	Thu Jul 19 20:28:54 2012 +0200
+++ b/MultiViewToolApplication.st	Fri Jul 20 10:22:53 2012 +0200
@@ -1129,10 +1129,12 @@
     ] ifFalse:[
         oldName := tabList at:wsIndex.
     ].
-    newName := Dialog request:(resources string:'New Name for %1:' with:oldName) initialAnswer:oldName.
+    newName := Dialog request:(resources string:'New Name for "%1":' with:oldName) initialAnswer:oldName.
     newName size == 0 ifTrue:[ ^ self].
 
     self renameWorkspace:wsIndex to:newName.
+
+    "Modified: / 20-07-2012 / 10:21:29 / cg"
 !
 
 renameWorkspace:wsIndex to:newName
@@ -1357,5 +1359,5 @@
 !MultiViewToolApplication class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/MultiViewToolApplication.st,v 1.43 2012-04-21 18:38:24 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/MultiViewToolApplication.st,v 1.44 2012-07-20 08:22:53 cg Exp $'
 ! !