Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Sun, 17 Feb 2019 15:46:07 +0100
changeset 18597 fae2862772d2
parent 18596 48275ca92cf1
child 18598 eaed5dce5c8d
#BUGFIX by cg class: Tools::NewSystemBrowser changed: #classMenuCopyAs
Tools__NewSystemBrowser.st file | annotate | diff | comparison | revisions 
--- a/Tools__NewSystemBrowser.st	Fri Feb 15 12:34:12 2019 +0100
+++ b/Tools__NewSystemBrowser.st	Sun Feb 17 15:46:07 2019 +0100
@@ -31452,8 +31452,8 @@
 "/    ].
 
     newClassName := Dialog
-                        requestClass:(resources string:'Copy class %1 as:' with:currentClassName allBold)
-                        initialAnswer:newClassName.
+                        requestClassName:(resources string:'Copy class %1 as:' with:currentClassName allBold)
+                        initialAnswer:(newClassName ? currentClassName).
     (newClassName isEmptyOrNil or:[newClassName withoutSeparators = currentClassName]) ifTrue:[
         ^ self
     ].
@@ -31511,7 +31511,7 @@
     self selectClass:newClass.
 
     "Modified: / 24-05-2012 / 15:49:14 / cg"
-    "Modified: / 14-02-2019 / 10:39:31 / Claus Gittinger"
+    "Modified: / 17-02-2019 / 15:44:06 / Claus Gittinger"
 !
 
 classMenuCopyClassNamesToClipboard
hg/stx-libtool