#REFACTORING by cg
class: DialogBox class
changed: #requestFileNameForImageSave:image:default:pattern:
removed the libtool prerequisite
--- a/DialogBox.st Wed Feb 20 10:24:03 2019 +0100
+++ b/DialogBox.st Wed Feb 20 10:29:13 2019 +0100
@@ -3392,16 +3392,18 @@
fromDirectory:nil
forSave:true
whenBoxCreatedEvaluate:[:box |
- |editButton paintButton copyButton|
+ |imageEditor editButton paintButton copyButton|
"/ UserPreferences current useNewFileDialog ifFalse:[
- editButton := Button label:(resources string:'Edit').
- editButton
- action:[
- box hide; destroy.
- ImageEditor openOnImage:anImage.
- ].
- box addButton:editButton.
-
+ (imageEditor := Smalltalk at:#ImageEditor) notNil ifTrue:[
+ editButton := Button label:(resources string:'Edit').
+ editButton
+ action:[
+ box hide; destroy.
+ imageEditor openOnImage:anImage.
+ ].
+ box addButton:editButton.
+ ].
+
paintButton := Button label:(resources string:'OS Editor').
paintButton
action:[
@@ -3433,6 +3435,8 @@
default:'screen.png'
pattern:'*.png'
"
+
+ "Modified: / 20-02-2019 / 10:28:13 / Claus Gittinger"
!
requestFileNameForSave:titleString