868 |
868 |
869 ^ |
869 ^ |
870 |
870 |
871 #(#Menu |
871 #(#Menu |
872 |
872 |
873 #( |
873 #( |
874 #(#MenuItem |
874 #(#MenuItem |
875 #label: 'About' |
875 #label: 'About' |
876 #translateLabel: true |
876 #translateLabel: true |
877 #activeHelpKey: #about |
877 #activeHelpKey: #about |
878 #labelImage: #(#ResourceRetriever nil #menuIcon) |
878 #labelImage: #(#ResourceRetriever nil #menuIcon) |
879 #submenuChannel: #menuAbout |
879 #submenuChannel: #menuAbout |
880 ) |
880 ) |
881 #(#MenuItem |
881 #(#MenuItem |
882 #label: 'File' |
882 #label: 'File' |
883 #translateLabel: true |
883 #translateLabel: true |
884 #activeHelpKey: #file |
884 #activeHelpKey: #file |
885 #enabled: #enableChannel |
885 #enabled: #enableChannel |
886 #submenu: |
886 #submenu: |
887 #(#Menu |
887 #(#Menu |
888 |
888 |
889 #( |
889 #( |
890 #(#MenuItem |
890 #(#MenuItem |
891 #label: 'New' |
891 #label: 'New' |
892 #translateLabel: true |
892 #translateLabel: true |
893 #value: #doNew |
893 #value: #doNew |
894 #activeHelpKey: #fileNew |
894 #activeHelpKey: #fileNew |
895 ) |
895 ) |
896 #(#MenuItem |
896 #(#MenuItem |
897 #label: '-' |
897 #label: '-' |
898 ) |
898 ) |
899 #(#MenuItem |
899 #(#MenuItem |
900 #label: 'Load...' |
900 #label: 'Load...' |
901 #translateLabel: true |
901 #translateLabel: true |
902 #value: #doLoad |
902 #value: #doLoad |
903 #activeHelpKey: #fileLoad |
903 #activeHelpKey: #fileLoad |
904 ) |
904 ) |
905 #(#MenuItem |
905 #(#MenuItem |
906 #label: 'Load Subspec...' |
906 #label: 'Load Subspec...' |
907 #translateLabel: true |
907 #translateLabel: true |
908 #value: #doLoadSubspec |
908 #value: #doLoadSubspec |
909 #activeHelpKey: #fileLoadSubspec |
909 #activeHelpKey: #fileLoadSubspec |
910 ) |
910 ) |
911 #(#MenuItem |
911 #(#MenuItem |
912 #label: '-' |
912 #label: '-' |
913 ) |
913 ) |
914 #(#MenuItem |
914 #(#MenuItem |
915 #label: 'Save' |
915 #label: 'Save' |
916 #translateLabel: true |
916 #translateLabel: true |
917 #value: #doSave |
917 #value: #doSave |
918 #activeHelpKey: #fileSave |
918 #activeHelpKey: #fileSave |
919 ) |
919 ) |
920 #(#MenuItem |
920 #(#MenuItem |
921 #label: 'Save As...' |
921 #label: 'Save As...' |
922 #translateLabel: true |
922 #translateLabel: true |
923 #value: #doSaveAs |
923 #value: #doSaveAs |
924 #activeHelpKey: #fileSaveAs |
924 #activeHelpKey: #fileSaveAs |
925 ) |
925 ) |
926 #(#MenuItem |
926 #(#MenuItem |
927 #label: 'Define Class And Selector...' |
927 #label: 'Define Class And Selector...' |
928 #translateLabel: true |
928 #translateLabel: true |
929 #value: #doDefineClassAndSelector |
929 #value: #doDefineClassAndSelector |
930 #activeHelpKey: #fileSaveAs |
930 #activeHelpKey: #fileSaveAs |
931 ) |
931 ) |
932 #(#MenuItem |
932 #(#MenuItem |
933 #label: '-' |
933 #label: '-' |
934 ) |
934 ) |
935 #(#MenuItem |
935 #(#MenuItem |
936 #label: 'Pick A Window Spec...' |
936 #label: 'Pick A Window Spec...' |
937 #translateLabel: true |
937 #translateLabel: true |
938 #value: #doPickAView |
938 #value: #doPickAView |
939 #activeHelpKey: #filePickAnInterface |
939 #activeHelpKey: #filePickAnInterface |
940 ) |
940 ) |
941 #(#MenuItem |
941 #(#MenuItem |
942 #label: '-' |
942 #label: '-' |
943 ) |
943 ) |
944 #(#MenuItem |
944 #(#MenuItem |
945 #label: 'Show Window Spec' |
945 #label: 'Show Window Spec' |
946 #translateLabel: true |
946 #translateLabel: true |
947 #value: #doWindowSpec |
947 #value: #doWindowSpec |
948 #activeHelpKey: #fileShowWindowSpec |
948 #activeHelpKey: #fileShowWindowSpec |
949 ) |
949 ) |
950 #(#MenuItem |
950 #(#MenuItem |
951 #label: 'Browse Class' |
951 #label: 'Browse Class' |
952 #translateLabel: true |
952 #translateLabel: true |
953 #value: #doBrowseClass |
953 #value: #doBrowseClass |
954 #activeHelpKey: #fileBrowseClass |
954 #activeHelpKey: #fileBrowseClass |
955 #enabled: #hasSpecClass |
955 #enabled: #hasSpecClass |
956 ) |
956 ) |
957 #(#MenuItem |
957 #(#MenuItem |
958 #label: 'Browse Aspect Methods' |
958 #label: 'Browse Aspect Methods' |
959 #translateLabel: true |
959 #translateLabel: true |
960 #value: #doBrowseAspectMethods |
960 #value: #doBrowseAspectMethods |
961 #activeHelpKey: #fileBrowseAspectMethods |
961 #activeHelpKey: #fileBrowseAspectMethods |
962 #enabled: #hasSpecClass |
962 #enabled: #hasSpecClass |
963 ) |
963 ) |
964 #(#MenuItem |
964 #(#MenuItem |
965 #label: '-' |
965 #label: '-' |
966 ) |
966 ) |
967 #(#MenuItem |
967 #(#MenuItem |
968 #label: 'Exit' |
968 #label: 'Exit' |
969 #translateLabel: true |
969 #translateLabel: true |
970 #value: #closeRequest |
970 #value: #closeRequest |
971 #activeHelpKey: #fileExit |
971 #activeHelpKey: #fileExit |
972 ) |
972 ) |
973 ) nil |
973 ) nil |
974 nil |
974 nil |
975 ) |
975 ) |
976 ) |
976 ) |
977 #(#MenuItem |
977 #(#MenuItem |
978 #label: 'Edit' |
978 #label: 'Edit' |
979 #translateLabel: true |
979 #translateLabel: true |
980 #activeHelpKey: #edit |
980 #activeHelpKey: #edit |
981 #submenuChannel: #menuEdit |
981 #submenuChannel: #menuEdit |
982 ) |
982 ) |
983 #(#MenuItem |
983 #(#MenuItem |
984 #label: 'Align' |
984 #label: 'Align' |
985 #translateLabel: true |
985 #translateLabel: true |
986 #activeHelpKey: #align |
986 #activeHelpKey: #align |
987 #submenuChannel: #menuAlign |
987 #submenuChannel: #menuAlign |
988 ) |
988 ) |
989 #(#MenuItem |
989 #(#MenuItem |
990 #label: 'Generate' |
990 #label: 'Generate' |
991 #translateLabel: true |
991 #translateLabel: true |
992 #activeHelpKey: #generate |
992 #activeHelpKey: #generate |
993 #submenu: |
993 #submenu: |
994 #(#Menu |
994 #(#Menu |
995 |
995 |
996 #( |
996 #( |
997 #(#MenuItem |
997 #(#MenuItem |
998 #label: 'Aspect Methods' |
998 #label: 'Aspect Methods' |
999 #translateLabel: true |
999 #translateLabel: true |
1000 #value: #doGenerateAspectMethods |
1000 #value: #doGenerateAspectMethods |
1001 #activeHelpKey: #generateAspectMethods |
1001 #activeHelpKey: #generateAspectMethods |
1002 #enabled: #hasSpecClass |
1002 #enabled: #hasSpecClass |
1003 ) |
1003 ) |
1004 #(#MenuItem |
1004 #(#MenuItem |
1005 #label: 'Menu Stub Methods' |
1005 #label: 'Menu Stub Methods' |
1006 #translateLabel: true |
1006 #translateLabel: true |
1007 #value: #doGenerateMenuMethods |
1007 #value: #doGenerateMenuMethods |
1008 ) |
1008 ) |
1009 #(#MenuItem |
1009 #(#MenuItem |
1010 #label: '-' |
1010 #label: '-' |
1011 ) |
1011 ) |
1012 #(#MenuItem |
1012 #(#MenuItem |
1013 #label: 'Hook Methods' |
1013 #label: 'Hook Methods' |
1014 #translateLabel: true |
1014 #translateLabel: true |
1015 #value: #doGenerateHookMethods |
1015 #value: #doGenerateHookMethods |
1016 #activeHelpKey: #generateHookMethods |
1016 #activeHelpKey: #generateHookMethods |
1017 #enabled: #hasSpecClass |
1017 #enabled: #hasSpecClass |
1018 ) |
1018 ) |
1019 ) nil |
1019 ) nil |
1020 nil |
1020 nil |
1021 ) |
1021 ) |
1022 ) |
1022 ) |
1023 #(#MenuItem |
1023 #(#MenuItem |
1024 #label: 'Test' |
1024 #label: 'Test' |
1025 #translateLabel: true |
1025 #translateLabel: true |
1026 #activeHelpKey: #test |
1026 #activeHelpKey: #test |
1027 #submenu: |
1027 #submenu: |
1028 #(#Menu |
1028 #(#Menu |
1029 |
1029 |
1030 #( |
1030 #( |
1031 #(#MenuItem |
1031 #(#MenuItem |
1032 #label: 'Start Application' |
1032 #label: 'Start Application' |
1033 #translateLabel: true |
1033 #translateLabel: true |
1034 #value: #doStartApplication |
1034 #value: #doStartApplication |
1035 #activeHelpKey: #testStartApplication |
1035 #activeHelpKey: #testStartApplication |
1036 ) |
1036 ) |
1037 #(#MenuItem |
1037 #(#MenuItem |
1038 #label: '-' |
1038 #label: '-' |
1039 ) |
1039 ) |
1040 #(#MenuItem |
1040 #(#MenuItem |
1041 #label: 'Geometry Test Mode' |
1041 #label: 'Geometry Test Mode' |
1042 #translateLabel: true |
1042 #translateLabel: true |
1043 #activeHelpKey: #testGeometryTestMode |
1043 #activeHelpKey: #testGeometryTestMode |
1044 #indication: #testMode: |
1044 #indication: #testMode: |
1045 ) |
1045 ) |
1046 ) nil |
1046 ) nil |
1047 nil |
1047 nil |
1048 ) |
1048 ) |
1049 ) |
1049 ) |
1050 #(#MenuItem |
1050 #(#MenuItem |
1051 #label: 'Settings' |
1051 #label: 'Settings' |
1052 #translateLabel: true |
1052 #translateLabel: true |
1053 #activeHelpKey: #settings |
1053 #activeHelpKey: #settings |
1054 #submenu: |
1054 #submenu: |
1055 #(#Menu |
1055 #(#Menu |
1056 |
1056 |
1057 #( |
1057 #( |
1058 #(#MenuItem |
1058 #(#MenuItem |
1059 #label: 'Canvas' |
1059 #label: 'Canvas' |
1060 #translateLabel: true |
1060 #translateLabel: true |
1061 #activeHelpKey: #settingsCanvas |
1061 #activeHelpKey: #settingsCanvas |
1062 #indication: #painterShown |
1062 #indication: #painterShown |
1063 ) |
1063 ) |
1064 #(#MenuItem |
1064 #(#MenuItem |
1065 #label: 'Gallery' |
1065 #label: 'Gallery' |
1066 #translateLabel: true |
1066 #translateLabel: true |
1067 #activeHelpKey: #settingsGallery |
1067 #activeHelpKey: #settingsGallery |
1068 #indication: #galleryShown |
1068 #indication: #galleryShown |
1069 ) |
1069 ) |
1070 #(#MenuItem |
1070 #(#MenuItem |
1071 #label: '-' |
1071 #label: '-' |
1072 ) |
1072 ) |
1073 #(#MenuItem |
1073 #(#MenuItem |
1074 #label: 'Redefine Aspect Methods' |
1074 #label: 'Redefine Aspect Methods' |
1075 #translateLabel: true |
1075 #translateLabel: true |
1076 #activeHelpKey: #settingsRedefineAspectMethods |
1076 #activeHelpKey: #settingsRedefineAspectMethods |
1077 #enabled: #hasSpecClass |
1077 #enabled: #hasSpecClass |
1078 #indication: #redefineAspectMethods: |
1078 #indication: #redefineAspectMethods: |
1079 ) |
1079 ) |
1080 #(#MenuItem |
1080 #(#MenuItem |
1081 #label: 'Aspects As Instances' |
1081 #label: 'Aspects As Instances' |
1082 #translateLabel: true |
1082 #translateLabel: true |
1083 #activeHelpKey: #settingsAspectsAsInstances |
1083 #activeHelpKey: #settingsAspectsAsInstances |
1084 #enabled: #hasSpecClass |
1084 #enabled: #hasSpecClass |
1085 #indication: #generateAspectsAsInstanceVariables: |
1085 #indication: #generateAspectsAsInstanceVariables: |
1086 ) |
1086 ) |
1087 #(#MenuItem |
1087 #(#MenuItem |
1088 #label: '-' |
1088 #label: '-' |
1089 ) |
1089 ) |
1090 #(#MenuItem |
1090 "/ #(#MenuItem |
1091 #label: 'Fonts' |
1091 "/ #label: 'Fonts' |
1092 #submenuChannel: #menuFont |
1092 "/ #submenuChannel: #menuFont |
1093 ) |
1093 "/ ) |
1094 #(#MenuItem |
1094 "/ #(#MenuItem |
1095 #label: '-' |
1095 "/ #label: '-' |
1096 ) |
1096 "/ ) |
1097 #(#MenuItem |
1097 #(#MenuItem |
1098 #label: 'Undo Manager...' |
1098 #label: 'Undo Manager...' |
1099 #translateLabel: true |
1099 #translateLabel: true |
1100 #value: #openUndoMenu |
1100 #value: #openUndoMenu |
1101 #activeHelpKey: #settingsUndoManager |
1101 #activeHelpKey: #settingsUndoManager |
1102 #enabled: #hasUndoHistory |
1102 #enabled: #hasUndoHistory |
1103 ) |
1103 ) |
1104 #(#MenuItem |
1104 #(#MenuItem |
1105 #label: 'Grid Manager...' |
1105 #label: 'Grid Manager...' |
1106 #translateLabel: true |
1106 #translateLabel: true |
1107 #value: #doDefineGrid |
1107 #value: #doDefineGrid |
1108 #activeHelpKey: #settingsGridManager |
1108 #activeHelpKey: #settingsGridManager |
1109 ) |
1109 ) |
1110 ) nil |
1110 ) nil |
1111 nil |
1111 nil |
1112 ) |
1112 ) |
1113 ) |
1113 ) |
1114 #(#MenuItem |
1114 #(#MenuItem |
1115 #label: 'History' |
1115 #label: 'History' |
1116 #translateLabel: true |
1116 #translateLabel: true |
1117 #activeHelpKey: #history |
1117 #activeHelpKey: #history |
1118 #submenuChannel: #menuHistory |
1118 #submenuChannel: #menuHistory |
1119 ) |
1119 ) |
1120 #(#MenuItem |
1120 #(#MenuItem |
1121 #label: 'Help' |
1121 #label: 'Help' |
1122 #translateLabel: true |
1122 #translateLabel: true |
1123 #startGroup: #right |
1123 #startGroup: #right |
1124 #activeHelpKey: #help |
1124 #activeHelpKey: #help |
1125 #submenu: |
1125 #submenu: |
1126 #(#Menu |
1126 #(#Menu |
1127 |
1127 |
1128 #( |
1128 #( |
1129 #(#MenuItem |
1129 #(#MenuItem |
1130 #label: 'Tutorial' |
1130 #label: 'Tutorial' |
1131 #translateLabel: true |
1131 #translateLabel: true |
1132 #value: #openHTMLDocument: |
1132 #value: #openHTMLDocument: |
1133 #activeHelpKey: #helpTutorial |
1133 #activeHelpKey: #helpTutorial |
1134 #argument: 'tools/uipainter/TOP.html' |
1134 #argument: 'tools/uipainter/TOP.html' |
1135 ) |
1135 ) |
1136 #(#MenuItem |
1136 #(#MenuItem |
1137 #label: '-' |
1137 #label: '-' |
1138 ) |
1138 ) |
1139 #(#MenuItem |
1139 #(#MenuItem |
1140 #label: 'Functions' |
1140 #label: 'Functions' |
1141 #translateLabel: true |
1141 #translateLabel: true |
1142 #value: #openHTMLDocument: |
1142 #value: #openHTMLDocument: |
1143 #activeHelpKey: #helpFunctions |
1143 #activeHelpKey: #helpFunctions |
1144 #argument: 'tools/uipainter/Functions.html' |
1144 #argument: 'tools/uipainter/Functions.html' |
1145 ) |
1145 ) |
1146 #(#MenuItem |
1146 #(#MenuItem |
1147 #label: 'Examples' |
1147 #label: 'Examples' |
1148 #translateLabel: true |
1148 #translateLabel: true |
1149 #value: #openHTMLDocument: |
1149 #value: #openHTMLDocument: |
1150 #activeHelpKey: #helpExamples |
1150 #activeHelpKey: #helpExamples |
1151 #argument: 'tools/uipainter/Examples.html' |
1151 #argument: 'tools/uipainter/Examples.html' |
1152 ) |
1152 ) |
1153 #(#MenuItem |
1153 #(#MenuItem |
1154 #label: '-' |
1154 #label: '-' |
1155 ) |
1155 ) |
1156 #(#MenuItem |
1156 #(#MenuItem |
1157 #label: 'Help Tool' |
1157 #label: 'Help Tool' |
1158 #translateLabel: true |
1158 #translateLabel: true |
1159 #value: #openHTMLDocument: |
1159 #value: #openHTMLDocument: |
1160 #activeHelpKey: #helpHelpTool |
1160 #activeHelpKey: #helpHelpTool |
1161 #argument: 'tools/uipainter/HelpTool.html' |
1161 #argument: 'tools/uipainter/HelpTool.html' |
1162 ) |
1162 ) |
1163 #(#MenuItem |
1163 #(#MenuItem |
1164 #label: 'Layout Tool' |
1164 #label: 'Layout Tool' |
1165 #translateLabel: true |
1165 #translateLabel: true |
1166 #value: #openHTMLDocument: |
1166 #value: #openHTMLDocument: |
1167 #activeHelpKey: #helpLayoutTool |
1167 #activeHelpKey: #helpLayoutTool |
1168 #argument: 'tools/uipainter/LayoutTool.html' |
1168 #argument: 'tools/uipainter/LayoutTool.html' |
1169 ) |
1169 ) |
1170 #(#MenuItem |
1170 #(#MenuItem |
1171 #label: '-' |
1171 #label: '-' |
1172 ) |
1172 ) |
1173 #(#MenuItem |
1173 #(#MenuItem |
1174 #label: 'Selected Widget' |
1174 #label: 'Selected Widget' |
1175 #translateLabel: true |
1175 #translateLabel: true |
1176 #value: #doOpenWidgetDocumentation |
1176 #value: #doOpenWidgetDocumentation |
1177 #activeHelpKey: #helpSelectedWidget |
1177 #activeHelpKey: #helpSelectedWidget |
1178 ) |
1178 ) |
1179 #(#MenuItem |
1179 #(#MenuItem |
1180 #label: '-' |
1180 #label: '-' |
1181 ) |
1181 ) |
1182 #(#MenuItem |
1182 #(#MenuItem |
1183 #label: 'Show Help Texts' |
1183 #label: 'Show Help Texts' |
1184 #translateLabel: true |
1184 #translateLabel: true |
1185 #activeHelpKey: #helpShowHelp |
1185 #activeHelpKey: #helpShowHelp |
1186 #indication: #showingHelp: |
1186 #indication: #showingHelp: |
1187 ) |
1187 ) |
1188 ) nil |
1188 ) nil |
1189 nil |
1189 nil |
1190 ) |
1190 ) |
1191 ) |
1191 ) |
1192 ) nil |
1192 ) nil |
1193 nil |
1193 nil |
1194 ) |
1194 ) |
1195 |
1195 |
1196 "Modified: / 23.8.1998 / 16:09:22 / cg" |
1196 "Modified: / 23.8.1998 / 16:09:22 / cg" |
1197 ! |
1197 ! |
1198 |
1198 |