added:
authorClaus Gittinger <cg@exept.de>
Wed, 24 Nov 2010 11:18:59 +0100
changeset 2826 653494536b68
parent 2825 49853e842335
child 2827 c99d2c520b28
added: #makeSlightlyBrighter #makeSlightlyDarker changed: #menuColors
ImageEditor.st
--- a/ImageEditor.st	Fri Nov 12 12:30:41 2010 +0100
+++ b/ImageEditor.st	Wed Nov 24 11:18:59 2010 +0100
@@ -2000,13 +2000,13 @@
                   activeHelpKey: compressColormap
                   enabled: hasColormapHolder
                   label: 'Compress Colormap'
-                  itemValue: menu_compressColorMap
+                  itemValue: #'menu_compressColorMap'
                   translateLabel: true
                 )
                (MenuItem
                   enabled: hasColormapHolder
                   label: 'Sort Colormap'
-                  itemValue: menu_sortColorMap
+                  itemValue: #'menu_sortColorMap'
                   translateLabel: true
                 )
                (MenuItem
@@ -2063,13 +2063,34 @@
                   translateLabel: true
                 )
                (MenuItem
-                  enabled: allowedToChangeImageDimensionAndDepth 
+                  enabled: allowedToChangeImageDimensionAndDepth
                   label: 'Make dithered 8Bit Palette'
                   itemValue: makeDitheredPaletteImage
                   translateLabel: true
                   isVisible: false
                 )
                (MenuItem
+                  label: 'Make Inverse'
+                  itemValue: makeInverse
+                  translateLabel: true
+                )
+               (MenuItem
+                  label: '-'
+                )
+               (MenuItem
+                  label: 'Make Slightly Brighter'
+                  itemValue: makeSlightlyBrighter
+                  translateLabel: true
+                )
+               (MenuItem
+                  label: 'Make Slightly Darker'
+                  itemValue: makeSlightlyDarker
+                  translateLabel: true
+                )
+               (MenuItem
+                  label: '-'
+                )
+               (MenuItem
                   label: 'Make Brighter'
                   itemValue: makeBrighter
                   translateLabel: true
@@ -2080,11 +2101,6 @@
                   translateLabel: true
                 )
                (MenuItem
-                  label: 'Make Inverse'
-                  itemValue: makeInverse
-                  translateLabel: true
-                )
-               (MenuItem
                   label: '-'
                 )
                (MenuItem
@@ -2113,26 +2129,26 @@
                   activeHelpKey: copyMask
                   enabled: hasMask
                   label: 'Copy Mask'
-                  itemValue: menu_copyMask
+                  itemValue: #'menu_copyMask'
                   translateLabel: true
                 )
                (MenuItem
                   activeHelpKey: pasteMask
                   enabled: hasMask
                   label: 'Paste Mask'
-                  itemValue: menu_pasteMask
+                  itemValue: #'menu_pasteMask'
                   translateLabel: true
                 )
                (MenuItem
                   enabled: hasMask
                   label: 'Clear Masked Pixels'
-                  itemValue: menu_clearMaskedPixels
+                  itemValue: #'menu_clearMaskedPixels'
                   translateLabel: true
                 )
                (MenuItem
                   enabled: hasMask
                   label: 'Clear Colormap Entry for Masked Pixels'
-                  itemValue: menu_clearColormapEntry0AndMaskedPixels
+                  itemValue: #'menu_clearColormapEntry0AndMaskedPixels'
                   translateLabel: true
                 )
                )
@@ -2144,8 +2160,6 @@
         nil
         nil
       )
-
-    "Modified: / 04-07-2010 / 10:16:23 / cg"
 !
 
 menuEdit
@@ -5154,6 +5168,36 @@
     self processSelectedColorWith:[:clr | Color brightness:(clr brightness)]
 !
 
+makeSlightlyBrighter
+    | anyChange|
+
+    self withExecuteCursorDo:[
+        anyChange := imageEditView makeSlightlyBrighter.
+        anyChange ifFalse:[
+            Dialog warn:'Image unchanged'.
+        ] ifTrue:[
+            self updateImage.
+        ]
+    ].
+
+    "Created: / 24-11-2010 / 11:06:11 / cg"
+!
+
+makeSlightlyDarker
+    | anyChange|
+
+    self withExecuteCursorDo:[
+        anyChange := imageEditView makeSlightlyDarker.
+        anyChange ifFalse:[
+            Dialog warn:'Image unchanged'.
+        ] ifTrue:[
+            self updateImage.
+        ]
+    ].
+
+    "Created: / 24-11-2010 / 11:06:23 / cg"
+!
+
 menu_clearColormapEntry0AndMaskedPixels
     "ensure that there is a colorMap entry with 0/0/0 at position
      0 and then clear all masked pixels (to pixelValue 0)"