--- a/ImageEditor.st	Thu Jan 18 17:03:09 2018 +0100
+++ b/ImageEditor.st	Thu Jan 18 17:07:20 2018 +0100
@@ -6785,9 +6785,7 @@
 
     clr := imageEditView getClipboardObject.
     clr isColor ifFalse:[
-        UserPreferences current beepInEditor ifTrue:[                
-            self window beep.
-        ].
+        self beepInEditor.
         ^ nil
     ].
     ^ clr
@@ -8139,9 +8137,7 @@
             t := tV value.
             b := bV value.
             (l + r + t + b) == 0 ifTrue:[
-                UserPreferences current beepInEditor ifTrue:[                
-                    self window beep
-                ]
+                self window beepInEditor
             ] ifFalse:[
                 img := imageEditView image.
                 firstChange ifTrue:[