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.
*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Mon, 24 Mar 2003 19:01:58 +0100
changeset 4717 e0f314d292c3
parent 4716 3df92d455996
child 4718 05f2668bebad
*** empty log message ***
NewSystemBrowser.st file | annotate | diff | comparison | revisions
Tools__NewSystemBrowser.st file | annotate | diff | comparison | revisions 
--- a/NewSystemBrowser.st	Mon Mar 24 18:08:05 2003 +0100
+++ b/NewSystemBrowser.st	Mon Mar 24 19:01:58 2003 +0100
@@ -19828,7 +19828,7 @@
     ].
 
     (Dialog 
-        confirm:('About to push ''%1'' down to subclasses which use it...' bindWith:varName)
+        confirm:('About to push instance variable ''%1'' down to subclasses which use it...' bindWith:varName allBold)
         title:('About to pushDown ''%1''...' bindWith:varName)
         yesLabel:'Proceed'
         noLabel:'Cancel') 
@@ -26335,6 +26335,7 @@
                                             'Name of new instance variable:'
                                          ]
                                      ])
+                            title:'Add Variable'
                             initialAnswer:initial.
     variableToAdd size == 0 ifTrue:[^ self].
 
@@ -55518,7 +55519,7 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.549 2003-03-24 17:00:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.550 2003-03-24 18:01:58 cg Exp $'
 ! !
 
 NewSystemBrowser initialize!
--- a/Tools__NewSystemBrowser.st	Mon Mar 24 18:08:05 2003 +0100
+++ b/Tools__NewSystemBrowser.st	Mon Mar 24 19:01:58 2003 +0100
@@ -19828,7 +19828,7 @@
     ].
 
     (Dialog 
-        confirm:('About to push ''%1'' down to subclasses which use it...' bindWith:varName)
+        confirm:('About to push instance variable ''%1'' down to subclasses which use it...' bindWith:varName allBold)
         title:('About to pushDown ''%1''...' bindWith:varName)
         yesLabel:'Proceed'
         noLabel:'Cancel') 
@@ -26335,6 +26335,7 @@
                                             'Name of new instance variable:'
                                          ]
                                      ])
+                            title:'Add Variable'
                             initialAnswer:initial.
     variableToAdd size == 0 ifTrue:[^ self].
 
@@ -55518,7 +55519,7 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.549 2003-03-24 17:00:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.550 2003-03-24 18:01:58 cg Exp $'
 ! !
 
 NewSystemBrowser initialize!
hg/stx-libtool