ToolApplicationModel.st
changeset 3024 0e1078fe4b3e
parent 3019 5badbdb40d34
child 3107 6343bde3fc47
--- a/ToolApplicationModel.st	Sun Sep 09 15:14:21 2012 +0200
+++ b/ToolApplicationModel.st	Sun Sep 09 21:05:30 2012 +0200
@@ -1416,14 +1416,13 @@
                                         anyItem := true.
                                         MenuItem new 
                                             label: histEntry printStringInMenu; 
-                                            value: #loadFromHistoryEntry: ; 
-                                            argument: histEntry; 
+                                            itemValue: #loadFromHistoryEntry: argument: histEntry; 
                                             activeHelpKey: #historyMenuItem]).
                     ]. 
 
     clearItem := MenuItem new 
                         label: 'Clear History'; 
-                        value: #emptyHistory; 
+                        itemValue: #emptyHistory; 
                         activeHelpKey: #historyEmptyMenu;
                         translateLabel:true.
     clearItem enabled:anyItem.
@@ -1432,7 +1431,7 @@
     menu findGuiResourcesIn:self.
     ^menu
 
-    "Modified: / 29.7.1998 / 11:40:11 / cg"
+    "Modified: / 09-09-2012 / 13:10:38 / cg"
 !
 
 remove:aHistoryEntry fromHistory: aHistory
@@ -1647,5 +1646,5 @@
 !ToolApplicationModel class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.141 2012-08-13 14:23:34 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.142 2012-09-09 19:05:30 cg Exp $'
 ! !