#OTHER by cg draft
authorClaus Gittinger <cg@exept.de>
Sat, 09 Mar 2019 21:41:24 +0100
changeset 3650 2fa5225d8d65
parent 3649 a51fab5fab19
child 3651 9fc108cad4bf
#OTHER by cg code saver
ImageEditor.st
--- a/ImageEditor.st	Thu Mar 07 11:01:45 2019 +0100
+++ b/ImageEditor.st	Sat Mar 09 21:41:24 2019 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1997-1998 by eXept Software AG
               All Rights Reserved
@@ -4700,14 +4702,10 @@
 !
 
 alphaVisibleHolder
-    |holder|
-
-    (holder := builder bindingAt:#alphaVisibleHolder) isNil ifTrue:[
-        builder aspectAt:#alphaVisibleHolder put:(holder := false asValue).
-    ].
-    ^ holder
+    ^ builder booleanValueAspectFor:#alphaVisibleHolder
 
     "Created: / 05-09-2017 / 00:35:36 / cg"
+    "Modified: / 09-03-2019 / 21:10:52 / Claus Gittinger"
 !
 
 canAddColorToColormap
@@ -4821,14 +4819,10 @@
 !
 
 cropBoxVisibleHolder
-    |holder|
-
-    (holder := builder bindingAt:#cropBoxVisibleHolder) isNil ifTrue:[
-        builder aspectAt:#cropBoxVisibleHolder put:(holder := false asValue).
-    ].
-    ^ holder
+    ^ builder booleanValueAspectFor:#cropBoxVisibleHolder
 
     "Created: / 03-02-2017 / 11:20:13 / cg"
+    "Modified: / 09-03-2019 / 21:11:00 / Claus Gittinger"
 !
 
 cropLeftAmount
@@ -4884,14 +4878,10 @@
 !
 
 floodFillBoxVisibleHolder
-    |holder|
-
-    (holder := builder bindingAt:#floodFillBoxVisibleHolder) isNil ifTrue:[
-        builder aspectAt:#floodFillBoxVisibleHolder put:(holder := false asValue).
-    ].
-    ^ holder
+    ^ builder booleanValueAspectFor:#floodFillBoxVisibleHolder
 
     "Created: / 19-02-2017 / 15:28:40 / cg"
+    "Modified: / 09-03-2019 / 21:11:11 / Claus Gittinger"
 !
 
 floodFillMaxHueError
@@ -5827,8 +5817,8 @@
         resourceSelector notNil ifTrue:[
             ^ resources 
                     string:(self modified 
-                            ifTrue:['ImageEditor (modified): %1  %2']
-                            ifFalse:['ImageEditor: %1  %2'])
+                            ifTrue:['ImageEditor (modified): %1 » %2']
+                            ifFalse:['ImageEditor: %1 » %2'])
                     with:resourceClass name
                     with:resourceSelector
         ].
@@ -5861,8 +5851,8 @@
         resourceSelector notNil ifTrue:[
             ^ resources 
                     string:(self modified 
-                            ifTrue:['Image (modified) from: %1  %2']
-                            ifFalse:['Image from: %1  %2'])
+                            ifTrue:['Image (modified) from: %1 » %2']
+                            ifFalse:['Image from: %1 » %2'])
                     with:resourceClass name
                     with:resourceSelector
         ].
@@ -6061,14 +6051,10 @@
 imageIsLoadedHolder
     "returns whether an image is loaded as value holder"
 
-    |holder|
-
-    (holder := builder bindingAt:#imageIsLoaded) isNil ifTrue:[
-        builder aspectAt:#imageIsLoaded put:(holder :=  false asValue).
-    ].
-    ^ holder
+    ^ builder booleanValueAspectFor:#imageIsLoadedHolder
 
     "Created: / 04-07-2010 / 10:15:38 / cg"
+    "Modified: / 09-03-2019 / 21:11:20 / Claus Gittinger"
 ! !
 
 !ImageEditor methodsFor:'menu item visibility'!