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>
Tue, 01 Oct 2002 10:32:23 +0200
changeset 3931 a53fbb09c47b
parent 3930 fe4074339623
child 3932 9ffed93833f7
*** empty log message ***
NewSystemBrowser.st file | annotate | diff | comparison | revisions
Tools__NewSystemBrowser.st file | annotate | diff | comparison | revisions 
--- a/NewSystemBrowser.st	Tue Oct 01 10:29:18 2002 +0200
+++ b/NewSystemBrowser.st	Tue Oct 01 10:32:23 2002 +0200
@@ -8195,6 +8195,7 @@
             #isButton: true
             #startGroup: #right
             #value: #debugMenuBreakPoint
+            #enabled: #hasMethodSelectedHolder
             #activeHelpKey: #addBreakPoint
             #labelImage: #(#ResourceRetriever nil #addBreakPointIcon2)
           )
@@ -8202,6 +8203,7 @@
             #label: 'Remove BreakPoint'
             #translateLabel: true
             #isButton: true
+            #enabled: #hasMethodSelectedHolder
             #value: #debugMenuRemoveBreakOrTrace
             #activeHelpKey: #removeBreakPoint
             #labelImage: #(#ResourceRetriever nil #removeBreakPointIcon2)
@@ -22036,7 +22038,7 @@
     someCategories := someCategories asOrderedCollection sort.
 
     newProtocol := self 
-                        askForMethodCategory:'name of new protocol:' 
+                        askForMethodCategory:'Name of new protocol:' 
                         okLabel:'Create' 
                         list:someCategories
                         initialAnswer:suggestion.
@@ -52725,7 +52727,7 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.420 2002-10-01 08:07:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.421 2002-10-01 08:32:23 cg Exp $'
 ! !
 
 NewSystemBrowser initialize!
--- a/Tools__NewSystemBrowser.st	Tue Oct 01 10:29:18 2002 +0200
+++ b/Tools__NewSystemBrowser.st	Tue Oct 01 10:32:23 2002 +0200
@@ -8195,6 +8195,7 @@
             #isButton: true
             #startGroup: #right
             #value: #debugMenuBreakPoint
+            #enabled: #hasMethodSelectedHolder
             #activeHelpKey: #addBreakPoint
             #labelImage: #(#ResourceRetriever nil #addBreakPointIcon2)
           )
@@ -8202,6 +8203,7 @@
             #label: 'Remove BreakPoint'
             #translateLabel: true
             #isButton: true
+            #enabled: #hasMethodSelectedHolder
             #value: #debugMenuRemoveBreakOrTrace
             #activeHelpKey: #removeBreakPoint
             #labelImage: #(#ResourceRetriever nil #removeBreakPointIcon2)
@@ -22036,7 +22038,7 @@
     someCategories := someCategories asOrderedCollection sort.
 
     newProtocol := self 
-                        askForMethodCategory:'name of new protocol:' 
+                        askForMethodCategory:'Name of new protocol:' 
                         okLabel:'Create' 
                         list:someCategories
                         initialAnswer:suggestion.
@@ -52725,7 +52727,7 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.420 2002-10-01 08:07:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.421 2002-10-01 08:32:23 cg Exp $'
 ! !
 
 NewSystemBrowser initialize!
hg/stx-libtool