# HG changeset patch
# User ca
# Date 1032454557 -7200
# Node ID 38c0340c1b1ed69e019203119e9a5ae879294cf8
# Parent  98b212d1e4e43b1399ab862123bc1e47a6ed1d66
*** empty log message ***

diff -r 98b212d1e4e4 -r 38c0340c1b1e MenuItem.st
--- a/MenuItem.st	Thu Sep 19 11:26:33 2002 +0200
+++ b/MenuItem.st	Thu Sep 19 18:55:57 2002 +0200
@@ -249,7 +249,9 @@
 !
 
 resourceRetriever:aRetriever
-    ^ self labelImage:aRetriever
+    (aRetriever notNil or:[adornment notNil]) ifTrue:[
+        self adornment labelImage:aRetriever
+    ].
 !
 
 shortcutKeyCharacter
@@ -1146,5 +1148,5 @@
 !MenuItem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.49 2002-09-16 10:57:02 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.50 2002-09-19 16:55:57 ca Exp $'
 ! !