changeset 3087 | bbbb798caa45 |
parent 3075 | ae4ba1019eb5 |
child 3095 | f7491ef4bcf0 |
--- a/MenuEditor.st Tue Feb 25 14:37:21 2014 +0100 +++ b/MenuEditor.st Wed Feb 26 12:27:25 2014 +0100 @@ -4209,7 +4209,7 @@ ] ifFalse:[ (cls respondsTo:#visualFor:) ifTrue:[ image := cls visualFor:sel. - image ~~ (cls perform:sel) ifTrue:[ + image ~~ (cls perform:sel ifNotUnderstood:nil) ifTrue:[ self warn:'The image is resolved via #visualFor: from some unknown class'. sel := #visualFor:. ].