equal
deleted
inserted
replaced
6711 |image| |
6711 |image| |
6712 |
6712 |
6713 self checkModified ifFalse:[ ^ self ]. |
6713 self checkModified ifFalse:[ ^ self ]. |
6714 |
6714 |
6715 image := imageEditView clipBoard. |
6715 image := imageEditView clipBoard. |
|
6716 image isImageOrForm ifFalse:[ |
|
6717 image := Image readFrom:(image asString) onError:nil. |
|
6718 image isNil ifTrue:[ |
|
6719 Dialog warn:'Clipboard does not contain an image I can use/understand'. |
|
6720 ^ self. |
|
6721 ]. |
|
6722 ]. |
6716 imageEditView image:image. |
6723 imageEditView image:image. |
6717 |
6724 |
6718 image notNil ifTrue:[ |
6725 image notNil ifTrue:[ |
6719 self updateColorsFromImage:image. |
6726 self updateColorsFromImage:image. |
6720 self findColorMapMode. |
6727 self findColorMapMode. |