equal
deleted
inserted
replaced
223 label: 'Others' |
223 label: 'Others' |
224 translateLabel: true |
224 translateLabel: true |
225 hideMenuOnActivated: false |
225 hideMenuOnActivated: false |
226 indication: showOthers |
226 indication: showOthers |
227 ) |
227 ) |
|
228 (MenuItem |
|
229 label: '-' |
|
230 ) |
|
231 (MenuItem |
|
232 label: 'Update' |
|
233 itemValue: menuUpdateModuleList |
|
234 translateLabel: true |
|
235 ) |
228 ) |
236 ) |
229 nil |
237 nil |
230 nil |
238 nil |
231 ) |
239 ) |
232 ) |
240 ) |
234 label: 'Module' |
242 label: 'Module' |
235 translateLabel: true |
243 translateLabel: true |
236 submenu: |
244 submenu: |
237 (Menu |
245 (Menu |
238 ( |
246 ( |
239 (MenuItem |
247 (MenuItem |
240 enabled: canBrowseSelectedModule |
248 enabled: canBrowseSelectedModule |
241 label: 'Browse' |
249 label: 'Browse' |
242 itemValue: browseModule |
250 itemValue: browseModule |
243 translateLabel: true |
251 translateLabel: true |
244 ) |
252 ) |
245 (MenuItem |
253 (MenuItem |
246 enabled: canCopyClassNameList |
254 enabled: canCopyClassNameList |
247 label: 'Copy Version Info to Clipboard' |
255 label: 'Copy Version Info to Clipboard' |
248 itemValue: copyClassOrVMNameList |
256 itemValue: copyClassOrVMNameList |
249 translateLabel: true |
257 translateLabel: true |
250 ) |
258 ) |
252 label: '-' |
260 label: '-' |
253 ) |
261 ) |
254 (MenuItem |
262 (MenuItem |
255 enabled: canUnloadSelectedModule |
263 enabled: canUnloadSelectedModule |
256 label: 'Unload' |
264 label: 'Unload' |
257 translateLabel: true |
265 itemValue: unloadSelectedModule |
258 itemValue: unloadSelectedModule |
266 translateLabel: true |
259 ) |
267 ) |
260 (MenuItem |
268 (MenuItem |
261 enabled: canUnloadSelectedModule |
269 enabled: canUnloadSelectedModule |
262 label: 'Remove Classes && Unload' |
270 label: 'Remove Classes && Unload' |
263 itemValue: unloadSelectedModuleAndRemoveClasses |
271 itemValue: unloadSelectedModuleAndRemoveClasses |
264 translateLabel: true |
272 translateLabel: true |
265 ) |
273 ) |
266 ) |
274 ) |
267 nil |
275 nil |
268 nil |
276 nil |
269 ) |
277 ) |
270 ) |
278 ) |
963 |
971 |
964 text := ((classInfoShown ? vmInfoShown)collect:[:eachRow | eachRow infoString]) asStringCollection asString. |
972 text := ((classInfoShown ? vmInfoShown)collect:[:eachRow | eachRow infoString]) asStringCollection asString. |
965 self window setClipboardText:text. |
973 self window setClipboardText:text. |
966 ! |
974 ! |
967 |
975 |
|
976 menuUpdateModuleList |
|
977 self updateModuleList |
|
978 |
|
979 "Modified: / 05-10-2007 / 13:11:45 / cg" |
|
980 ! |
|
981 |
968 openDocumentation |
982 openDocumentation |
969 self openHTMLDocument: 'tools/misc/TOP.html#MODULEINFO' |
983 self openHTMLDocument: 'tools/misc/TOP.html#MODULEINFO' |
970 |
984 |
971 "Modified: / 05-10-2007 / 13:11:45 / cg" |
985 "Modified: / 05-10-2007 / 13:11:45 / cg" |
972 ! |
986 ! |