equal
deleted
inserted
replaced
2333 postBuildNoteBook:aNoteBook |
2333 postBuildNoteBook:aNoteBook |
2334 aNoteBook tabLabelInset:16@4. |
2334 aNoteBook tabLabelInset:16@4. |
2335 ! ! |
2335 ! ! |
2336 |
2336 |
2337 !MenuEditor methodsFor:'menus-dynamic'! |
2337 !MenuEditor methodsFor:'menus-dynamic'! |
2338 |
|
2339 editMenu |
|
2340 self halt. |
|
2341 ^ super editMenu |
|
2342 ! |
|
2343 |
2338 |
2344 submenuTest |
2339 submenuTest |
2345 "returns a menu on the current editing menu |
2340 "returns a menu on the current editing menu |
2346 " |
2341 " |
2347 |menu indication choice submenu retriever| |
2342 |menu indication choice submenu retriever| |