equal
deleted
inserted
replaced
576 nil |
576 nil |
577 nil |
577 nil |
578 ) |
578 ) |
579 |
579 |
580 "Modified: / 18-02-2007 / 15:17:18 / cg" |
580 "Modified: / 18-02-2007 / 15:17:18 / cg" |
|
581 ! |
|
582 |
|
583 toolBarMenu |
|
584 "This resource specification was automatically generated |
|
585 by the MenuEditor of ST/X." |
|
586 |
|
587 "Do not manually edit this!! If it is corrupted, |
|
588 the MenuEditor may not be able to read the specification." |
|
589 |
|
590 " |
|
591 MenuEditor new openOnClass:WorkspaceApplication andSelector:#toolBarMenu |
|
592 (Menu new fromLiteralArrayEncoding:(WorkspaceApplication toolBarMenu)) startUp |
|
593 " |
|
594 |
|
595 <resource: #menu> |
|
596 |
|
597 ^ |
|
598 #(Menu |
|
599 ( |
|
600 (MenuItem |
|
601 label: '' |
|
602 ) |
|
603 (MenuItem |
|
604 label: 'Add Buffer' |
|
605 itemValue: addWorkspace |
|
606 translateLabel: true |
|
607 isButton: true |
|
608 labelImage: (ResourceRetriever ToolbarIconLibrary addBufferIcon) |
|
609 ) |
|
610 (MenuItem |
|
611 label: '-' |
|
612 ) |
|
613 (MenuItem |
|
614 label: 'Save As...' |
|
615 itemValue: menuSaveAs |
|
616 translateLabel: true |
|
617 isButton: true |
|
618 labelImage: (ResourceRetriever ToolbarIconLibrary saveToFileAsIcon) |
|
619 ) |
|
620 (MenuItem |
|
621 label: '-' |
|
622 ) |
|
623 (MenuItem |
|
624 label: 'DoIt' |
|
625 itemValue: doIt |
|
626 translateLabel: true |
|
627 labelImage: (ResourceRetriever XPToolbarIconLibrary doItIcon) |
|
628 ) |
|
629 (MenuItem |
|
630 label: 'InspectIt' |
|
631 itemValue: inspectIt |
|
632 translateLabel: true |
|
633 labelImage: (ResourceRetriever XPToolbarIconLibrary inspectItIcon) |
|
634 ) |
|
635 (MenuItem |
|
636 label: '-' |
|
637 ) |
|
638 ) |
|
639 nil |
|
640 nil |
|
641 ) |
|
642 |
|
643 "Modified: / 20-02-2007 / 15:49:11 / cg" |
581 ! ! |
644 ! ! |
582 |
645 |
583 !WorkspaceApplication class methodsFor:'special startup'! |
646 !WorkspaceApplication class methodsFor:'special startup'! |
584 |
647 |
585 openEvaluationWorkspace |
648 openEvaluationWorkspace |
1574 ! ! |
1637 ! ! |
1575 |
1638 |
1576 !WorkspaceApplication class methodsFor:'documentation'! |
1639 !WorkspaceApplication class methodsFor:'documentation'! |
1577 |
1640 |
1578 version |
1641 version |
1579 ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.125 2007-02-19 15:06:29 cg Exp $' |
1642 ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.126 2007-02-20 14:49:31 cg Exp $' |
1580 ! ! |
1643 ! ! |