# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1242114226 -7200
# Node ID 8ee06c8f3f9f7ff4092975ffd54665335dae7732
# Parent  6e93fbc8da36f0aed9f79a503ac9058e44067d5e
beepInEditor flag

diff -r 6e93fbc8da36 -r 8ee06c8f3f9f 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:[