--- a/VersionDiffBrowser.st Sun Sep 08 23:48:38 2019 +0200
+++ b/VersionDiffBrowser.st Mon Sep 09 10:49:15 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 2000 by eXept Software AG
All Rights Reserved
@@ -1102,6 +1104,12 @@
#enabled: #hasChangeSelectedInA
)
#(#MenuItem
+ #label: 'Apply All'
+ #translateLabel: true
+ #value: #applyAllChangesInA
+ #enabled: #hasChangeSelectedInA
+ )
+ #(#MenuItem
#label: 'Browse'
#translateLabel: true
#value: #browseClassInA
@@ -1185,6 +1193,12 @@
#enabled: #hasChangeSelectedInB
)
#(#MenuItem
+ #label: 'Apply All'
+ #translateLabel: true
+ #value: #applyAllChangesInB
+ #enabled: #hasChangeSelectedInB
+ )
+ #(#MenuItem
#label: 'Browse'
#translateLabel: true
#value: #browseClassInB
@@ -2010,6 +2024,20 @@
self applyChange:change
!
+applyAllChanges:listOfChanges
+ listOfChanges do:[:each |
+ self applyChange:each
+ ]
+!
+
+applyAllChangesInA
+ self applyAllChanges:methodsOnlyInAFiltered
+!
+
+applyAllChangesInB
+ self applyAllChanges:methodsOnlyInBFiltered
+!
+
applyChange:change
change notNil ifTrue:[
change apply
@@ -4343,7 +4371,7 @@
].
].
changeClassName notEmptyOrNil ifTrue:[
- selectorString := ' » ',selectorString
+ selectorString := ' » ',selectorString
]
].