--- a/UIPainter.st	Fri Jul 04 12:27:14 2014 +0200
+++ b/UIPainter.st	Tue Jul 08 15:16:23 2014 +0200
@@ -4116,8 +4116,10 @@
                 usefulReplacementSpecClasses do:[:eachClass |      
                     |item|
 
-                    item := MenuItem new label:(resources string:'Replace by %1' with:eachClass userFriendlyName).
-                    item itemValue:#replaceWidgetByClass: argument:eachClass.
+                    item := MenuItem  
+                                label:(resources string:'Replace by %1' with:eachClass userFriendlyName)
+                                itemValue:#replaceWidgetByClass: argument:eachClass.
+                    item translateLabel:false.
                     m addItem:item.
                 ].
             ].