changeset 3164 | 890b62a044be |
parent 3157 | 1c2d4a99b02a |
child 3170 | a49100905be3 |
--- a/ImageEditor.st Sat Nov 22 02:15:52 2014 +0100 +++ b/ImageEditor.st Sun Nov 23 14:46:15 2014 +0100 @@ -6713,6 +6713,13 @@ self checkModified ifFalse:[ ^ self ]. image := imageEditView clipBoard. + image isImageOrForm ifFalse:[ + image := Image readFrom:(image asString) onError:nil. + image isNil ifTrue:[ + Dialog warn:'Clipboard does not contain an image I can use/understand'. + ^ self. + ]. + ]. imageEditView image:image. image notNil ifTrue:[