equal
deleted
inserted
replaced
272 self goBackItems do:[:item | |
272 self goBackItems do:[:item | |
273 menu addItem:(MenuItem label:item displayString itemValue:[ self goTo:item ]). |
273 menu addItem:(MenuItem label:item displayString itemValue:[ self goTo:item ]). |
274 any := true. |
274 any := true. |
275 ]. |
275 ]. |
276 menu addSeparator. |
276 menu addSeparator. |
277 menu addItem:((MenuItem label:'Clear History' value:[ self clearHistory]) enabled:any). |
277 menu addItem:((MenuItem label:'Clear History' itemValue:[ self clearHistory]) enabled:any). |
278 ^ menu |
278 ^ menu |
279 |
279 |
280 "Created: / 22-02-2008 / 16:57:46 / janfrog" |
280 "Created: / 22-02-2008 / 16:57:46 / janfrog" |
281 "Modified: / 27-02-2008 / 11:52:12 / janfrog" |
281 "Modified: / 27-02-2008 / 11:52:12 / janfrog" |
|
282 "Modified: / 29-03-2017 / 13:03:27 / stefan" |
282 ! |
283 ! |
283 |
284 |
284 goForwardMenu |
285 goForwardMenu |
285 |menu| |
286 |menu| |
286 |
287 |