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.
category change
authorClaus Gittinger <cg@exept.de>
Tue, 10 Dec 2002 12:02:15 +0100
changeset 4359 35995cc972f7
parent 4358 b0023a5ca3b8
child 4360 959719f86629
category change
VersionDiffBrowser.st file | annotate | diff | comparison | revisions
WorkspaceApplication.st file | annotate | diff | comparison | revisions 
--- a/VersionDiffBrowser.st	Tue Dec 10 12:01:45 2002 +0100
+++ b/VersionDiffBrowser.st	Tue Dec 10 12:02:15 2002 +0100
@@ -1049,26 +1049,6 @@
     ^ onlyInBLabelHolder.
 ! !
 
-!VersionDiffBrowser methodsFor:'aspects - menu'!
-
-canAcceptInCodeView
-    ^ self hasChangeSelectedInA
-      or:[self hasChangeSelectedInB
-      or:[self hasChangeSelectedInM]]
-!
-
-hasChangeSelectedInA
-    ^ self selectedChangeInA notNil
-!
-
-hasChangeSelectedInB
-    ^ self selectedChangeInB notNil
-!
-
-hasChangeSelectedInM
-    ^ self methodsChangedSelection value notNil
-! !
-
 !VersionDiffBrowser methodsFor:'aspects-exported'!
 
 changedLabelHolder:aValueHolder
@@ -1120,6 +1100,26 @@
     ]
 ! !
 
+!VersionDiffBrowser methodsFor:'aspects-menu'!
+
+canAcceptInCodeView
+    ^ self hasChangeSelectedInA
+      or:[self hasChangeSelectedInB
+      or:[self hasChangeSelectedInM]]
+!
+
+hasChangeSelectedInA
+    ^ self selectedChangeInA notNil
+!
+
+hasChangeSelectedInB
+    ^ self selectedChangeInB notNil
+!
+
+hasChangeSelectedInM
+    ^ self methodsChangedSelection value notNil
+! !
+
 !VersionDiffBrowser methodsFor:'change & update'!
 
 update:something with:parameter from:changedObject
@@ -1987,5 +1987,5 @@
 !VersionDiffBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.62 2002-10-31 13:50:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.63 2002-12-10 11:02:15 cg Exp $'
 ! !
--- a/WorkspaceApplication.st	Tue Dec 10 12:01:45 2002 +0100
+++ b/WorkspaceApplication.st	Tue Dec 10 12:02:15 2002 +0100
@@ -633,7 +633,7 @@
     ^ super closeRequest
 ! !
 
-!WorkspaceApplication methodsFor:'menu actions'!
+!WorkspaceApplication methodsFor:'menu-actions'!
 
 addGlobalVariable
     |name nameKey selection|
@@ -1410,5 +1410,5 @@
 !WorkspaceApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.50 2002-12-10 11:01:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.51 2002-12-10 11:02:03 cg Exp $'
 ! !
hg/stx-libtool