825 |
825 |
826 ^ |
826 ^ |
827 #(Menu |
827 #(Menu |
828 ( |
828 ( |
829 (MenuItem |
829 (MenuItem |
830 label: 'Add Buffer' |
830 label: 'Add Page' |
831 itemValue: addWorkspace |
831 itemValue: addWorkspace |
832 translateLabel: true |
832 translateLabel: true |
833 shortcutKey: Ctrlt |
833 shortcutKey: Ctrlt |
834 ) |
834 ) |
835 (MenuItem |
835 (MenuItem |
836 label: 'Add Buffer with same Contents' |
836 label: 'Add Page with same Contents' |
837 itemValue: addWorkspaceWithSameContents |
837 itemValue: addWorkspaceWithSameContents |
838 translateLabel: true |
838 translateLabel: true |
839 ) |
839 ) |
840 (MenuItem |
840 (MenuItem |
841 label: '-' |
841 label: '-' |
842 isVisible: thisIsASmalltalkWorkspace |
842 isVisible: thisIsASmalltalkWorkspace |
843 ) |
843 ) |
844 (MenuItem |
844 (MenuItem |
845 label: 'Add Buffer on MyWorkspace' |
845 label: 'Add Page on MyWorkspace' |
846 itemValue: addMyWorkspace |
846 itemValue: addMyWorkspace |
847 translateLabel: true |
847 translateLabel: true |
848 isVisible: thisIsASmalltalkWorkspace |
848 isVisible: thisIsASmalltalkWorkspace |
849 ) |
849 ) |
850 (MenuItem |
850 (MenuItem |
851 enabled: anyWorkspaceVariableIsDefined |
851 enabled: anyWorkspaceVariableIsDefined |
852 label: 'Add Buffer on Workspace Variables' |
852 label: 'Add Page on Workspace Variables' |
853 itemValue: addWorkspaceVariableInspector |
853 itemValue: addWorkspaceVariableInspector |
854 translateLabel: true |
854 translateLabel: true |
855 isVisible: thisIsASmalltalkWorkspace |
855 isVisible: thisIsASmalltalkWorkspace |
856 ) |
856 ) |
857 (MenuItem |
857 (MenuItem |
858 label: 'Add Buffer on Global Variables' |
858 label: 'Add Page on Global Variables' |
859 itemValue: addGlobalVariableInspector |
859 itemValue: addGlobalVariableInspector |
860 translateLabel: true |
860 translateLabel: true |
861 isVisible: thisIsASmalltalkWorkspace |
861 isVisible: thisIsASmalltalkWorkspace |
862 ) |
862 ) |
863 (MenuItem |
863 (MenuItem |
864 label: 'Add Buffer on Namespace...' |
864 label: 'Add Page on Namespace...' |
865 itemValue: addNamespaceInspector |
865 itemValue: addNamespaceInspector |
866 translateLabel: true |
866 translateLabel: true |
867 isVisible: thisIsASmalltalkWorkspace |
867 isVisible: thisIsASmalltalkWorkspace |
868 ) |
868 ) |
869 (MenuItem |
869 (MenuItem |
870 label: 'Add Buffer on SharedPool...' |
870 label: 'Add Page on SharedPool...' |
871 itemValue: addSharedPoolInspector |
871 itemValue: addSharedPoolInspector |
872 translateLabel: true |
872 translateLabel: true |
873 isVisible: thisIsASmalltalkWorkspace |
873 isVisible: thisIsASmalltalkWorkspace |
874 ) |
874 ) |
875 (MenuItem |
875 (MenuItem |
876 label: 'Add Buffer on Class Variables' |
876 label: 'Add Page on Class Variables' |
877 itemValue: addClassVariableInspector |
877 itemValue: addClassVariableInspector |
878 translateLabel: true |
878 translateLabel: true |
879 isVisible: thisIsASmalltalkWorkspace |
879 isVisible: thisIsASmalltalkWorkspace |
880 ) |
880 ) |
881 (MenuItem |
881 (MenuItem |
882 label: '-' |
882 label: '-' |
883 isVisible: thisIsASmalltalkWorkspace |
883 isVisible: thisIsASmalltalkWorkspace |
884 ) |
884 ) |
885 (MenuItem |
885 (MenuItem |
886 label: 'Add Evaluation Buffer' |
886 label: 'Add Evaluation Page' |
887 itemValue: addEvaluationWorkspace |
887 itemValue: addEvaluationWorkspace |
888 translateLabel: true |
888 translateLabel: true |
889 isVisible: thisIsASmalltalkWorkspace |
889 isVisible: thisIsASmalltalkWorkspace |
890 ) |
890 ) |
891 (MenuItem |
891 (MenuItem |
908 (MenuItem |
908 (MenuItem |
909 label: '-' |
909 label: '-' |
910 ) |
910 ) |
911 (MenuItem |
911 (MenuItem |
912 enabled: canRemoveWorkspace |
912 enabled: canRemoveWorkspace |
913 label: 'Remove Buffer' |
913 label: 'Remove Page' |
914 itemValue: removeWorkspace |
914 itemValue: removeWorkspace |
915 translateLabel: true |
915 translateLabel: true |
916 ) |
916 ) |
917 ) |
917 ) |
918 nil |
918 nil |
919 nil |
919 nil |
920 ) |
920 ) |
921 |
921 |
922 "Modified: / 22-10-2017 / 20:38:32 / cg" |
922 "Modified: / 22-10-2017 / 20:38:32 / cg" |
|
923 "Modified: / 21-09-2018 / 10:57:30 / Claus Gittinger" |
923 ! |
924 ! |
924 |
925 |
925 editMenu |
926 editMenu |
926 "This resource specification was automatically generated |
927 "This resource specification was automatically generated |
927 by the MenuEditor of ST/X." |
928 by the MenuEditor of ST/X." |