#REFACTORING by mawalch
class: ChangeSetBrowser
changed: #askIfChangesAreToBeWrittenBack (send #request:label:image:buttonLabels:values:default:onCancel: instead of #request:label:form:buttonLabels:values:default:onCancel:)
Move from obsolete method to new one.
--- a/ChangeSetBrowser.st Thu Jul 21 10:50:55 2016 +0200
+++ b/ChangeSetBrowser.st Thu Jul 21 21:13:31 2016 +0200
@@ -562,10 +562,10 @@
anyChanges ifFalse:[^ self].
- action := OptionBox
+ action := OptionBox
request:(resources string:'The modified changeSet has not been saved.\\Update the changeSet before closing ?') withCRs
label:'ChangesBrowser'
- form:(WarningBox iconBitmap)
+ image:(WarningBox iconBitmap)
buttonLabels:(resources array:#('Cancel' 'Don''t Update' 'Update'))
values:#(#abort #ignore #save)
default:#save
@@ -631,7 +631,7 @@
!
showingDiffsDefault
- ^ "false" super showingDiffsDefault
+ ^ "false" super showingDiffsDefault
! !
!ChangeSetBrowser methodsFor:'menu aspects'!