ImageEditor.st
changeset 2520 8ee06c8f3f9f
parent 2449 5ef668d71314
child 2539 3fa0fde65f75
equal deleted inserted replaced
2519:6e93fbc8da36 2520:8ee06c8f3f9f
  4760 pasteColorIntoColormap
  4760 pasteColorIntoColormap
  4761     |copyBufferColor|
  4761     |copyBufferColor|
  4762 
  4762 
  4763     copyBufferColor := imageEditView getClipboardObject.
  4763     copyBufferColor := imageEditView getClipboardObject.
  4764     copyBufferColor isColor ifFalse:[
  4764     copyBufferColor isColor ifFalse:[
  4765         self window beep.
  4765         UserPreferences current beepInEditor ifTrue:[                
       
  4766             self window beep.
       
  4767         ].
  4766         ^ self
  4768         ^ self
  4767     ].
  4769     ].
  4768 
  4770 
  4769     self processSelectedColorWith:[:clr |
  4771     self processSelectedColorWith:[:clr |
  4770         copyBufferColor
  4772         copyBufferColor
  5205             l := lV value.
  5207             l := lV value.
  5206             r := rV value.
  5208             r := rV value.
  5207             t := tV value.
  5209             t := tV value.
  5208             b := bV value.
  5210             b := bV value.
  5209             (l + r + t + b) == 0 ifTrue:[
  5211             (l + r + t + b) == 0 ifTrue:[
  5210                 self window beep
  5212                 UserPreferences current beepInEditor ifTrue:[                
       
  5213                     self window beep
       
  5214                 ]
  5211             ] ifFalse:[
  5215             ] ifFalse:[
  5212                 img := imageEditView image.
  5216                 img := imageEditView image.
  5213                 firstChange ifTrue:[
  5217                 firstChange ifTrue:[
  5214                     imageEditView makeUndo.
  5218                     imageEditView makeUndo.
  5215                     firstChange := false.
  5219                     firstChange := false.