author | Claus Gittinger <cg@exept.de> |
Tue, 12 May 2009 09:43:51 +0200 | |
changeset 2521 | 5cfd5fcd7bd3 |
parent 2520 | 8ee06c8f3f9f |
child 2522 | 45f29cf0cc5e |
--- 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