beepInEditor flag
authorClaus Gittinger <cg@exept.de>
Tue, 12 May 2009 09:43:46 +0200
changeset 2520 8ee06c8f3f9f
parent 2519 6e93fbc8da36
child 2521 5cfd5fcd7bd3
beepInEditor flag
ImageEditor.st
--- a/ImageEditor.st	Tue May 12 02:19:41 2009 +0200
+++ b/ImageEditor.st	Tue May 12 09:43:46 2009 +0200
@@ -4762,7 +4762,9 @@
 
     copyBufferColor := imageEditView getClipboardObject.
     copyBufferColor isColor ifFalse:[
-        self window beep.
+        UserPreferences current beepInEditor ifTrue:[                
+            self window beep.
+        ].
         ^ self
     ].
 
@@ -5207,7 +5209,9 @@
             t := tV value.
             b := bV value.
             (l + r + t + b) == 0 ifTrue:[
-                self window beep
+                UserPreferences current beepInEditor ifTrue:[                
+                    self window beep
+                ]
             ] ifFalse:[
                 img := imageEditView image.
                 firstChange ifTrue:[