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

diff -r 8ee06c8f3f9f -r 5cfd5fcd7bd3 ColorEditDialog.st
--- a/ColorEditDialog.st	Tue May 12 09:43:46 2009 +0200
+++ b/ColorEditDialog.st	Tue May 12 09:43:51 2009 +0200
@@ -697,7 +697,9 @@
 
     copyBufferColor := self window getClipboardObject.
     copyBufferColor isColor ifFalse:[
-        self window beep.
+        UserPreferences current beepInEditor ifTrue:[                
+            self window beep.
+        ].
         ^ self
     ].
     self color:copyBufferColor