equal
deleted
inserted
replaced
47 |
47 |
48 Extracted for pluggability from SourceCodeManagerSettings in the AbstractSettingsApplication. |
48 Extracted for pluggability from SourceCodeManagerSettings in the AbstractSettingsApplication. |
49 " |
49 " |
50 ! ! |
50 ! ! |
51 |
51 |
|
52 |
52 !GitSourceCodeManagementSettingsAppl class methodsFor:'defaults'! |
53 !GitSourceCodeManagementSettingsAppl class methodsFor:'defaults'! |
53 |
54 |
54 defaultRepositoryName |
55 defaultRepositoryName |
55 |
56 |
56 ^ './gitRepository' |
57 ^ './gitRepository' |
57 |
58 |
58 "Created: / 19-04-2011 / 11:00:11 / cg" |
59 "Created: / 19-04-2011 / 11:00:11 / cg" |
59 ! ! |
60 ! ! |
|
61 |
60 |
62 |
61 !GitSourceCodeManagementSettingsAppl class methodsFor:'help specs'! |
63 !GitSourceCodeManagementSettingsAppl class methodsFor:'help specs'! |
62 |
64 |
63 helpSpec |
65 helpSpec |
64 "This resource specification was automatically generated |
66 "This resource specification was automatically generated |
179 |
181 |
180 ) |
182 ) |
181 |
183 |
182 "Modified: / 09-08-2012 / 09:41:18 / cg" |
184 "Modified: / 09-08-2012 / 09:41:18 / cg" |
183 ! ! |
185 ! ! |
|
186 |
184 |
187 |
185 !GitSourceCodeManagementSettingsAppl class methodsFor:'image specs'! |
188 !GitSourceCodeManagementSettingsAppl class methodsFor:'image specs'! |
186 |
189 |
187 defaultIcon |
190 defaultIcon |
188 ^ self defaultIcon2 |
191 ^ self defaultIcon2 |
241 @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@HB@TEC0@@@@@@@@@@@@@@@@@@@@@@@@THB@ HAP@@@@@@@@@@@@@@@@@@@@@@@P H@@<@@@T@@@@@@@@@@@@@@@@@ |
244 @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@HB@TEC0@@@@@@@@@@@@@@@@@@@@@@@@THB@ HAP@@@@@@@@@@@@@@@@@@@@@@@P H@@<@@@T@@@@@@@@@@@@@@@@@ |
242 @@@@AP,E@@@@@@@@@@@@@@@@@@@@@@@@@@TEB@\HA @@BP@@@@@@@@@@@@@@@@@@@@@EA0 E@@@IBP$@@@@@@@@@@@@@@@@@@@@@APP@@@$C@00I@@@@@@@@ |
245 @@@@AP,E@@@@@@@@@@@@@@@@@@@@@@@@@@TEB@\HA @@BP@@@@@@@@@@@@@@@@@@@@@EA0 E@@@IBP$@@@@@@@@@@@@@@@@@@@@@APP@@@$C@00I@@@@@@@@ |
243 @@@@@@@@@@@@@@@@@@@JBP$I@@@@@@@@@@@@@@@@@@@I@@<@@@@IBP@@@@@@@@@@@@@@@@@@@@@@BP$IBP$I@@@@@@@@@@@@@@@@@@@@@@@@@@(IBP$@@@@@ |
246 @@@@@@@@@@@@@@@@@@@JBP$I@@@@@@@@@@@@@@@@@@@I@@<@@@@IBP@@@@@@@@@@@@@@@@@@@@@@BP$IBP$I@@@@@@@@@@@@@@@@@@@@@@@@@@(IBP$@@@@@ |
244 @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@') ; colorMapFromArray:#[0 0 0 0 64 0 0 128 0 32 32 32 32 64 32 32 96 32 32 128 32 32 128 64 32 160 64 64 64 64 96 96 96 96 192 128 128 128 128 192 0 0 209 87 87 255 255 255]; mask:((Depth1Image new) width: 24; height: 24; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@@>>>@>>>@@@@@@@@@XXX@^^^@>>>@<<<@LLL@@@@A<@@C<@@GR@@G@@@_$@@ON@@F_@@@O@@JL@@G<@@C8@@@@@@') ; yourself); yourself] |
247 @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@') ; colorMapFromArray:#[0 0 0 0 64 0 0 128 0 32 32 32 32 64 32 32 96 32 32 128 32 32 128 64 32 160 64 64 64 64 96 96 96 96 192 128 128 128 128 192 0 0 209 87 87 255 255 255]; mask:((Depth1Image new) width: 24; height: 24; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@@>>>@>>>@@@@@@@@@XXX@^^^@>>>@<<<@LLL@@@@A<@@C<@@GR@@G@@@_$@@ON@@F_@@@O@@JL@@G<@@C8@@@@@@') ; yourself); yourself] |
245 ! ! |
248 ! ! |
|
249 |
246 |
250 |
247 !GitSourceCodeManagementSettingsAppl class methodsFor:'interface specs'! |
251 !GitSourceCodeManagementSettingsAppl class methodsFor:'interface specs'! |
248 |
252 |
249 windowSpec |
253 windowSpec |
250 "This resource specification was automatically generated |
254 "This resource specification was automatically generated |
761 |
765 |
762 ) |
766 ) |
763 ) |
767 ) |
764 ! ! |
768 ! ! |
765 |
769 |
|
770 |
766 !GitSourceCodeManagementSettingsAppl class methodsFor:'queries'! |
771 !GitSourceCodeManagementSettingsAppl class methodsFor:'queries'! |
767 |
772 |
768 managerClass |
773 managerClass |
769 "backlink to my manager class (needed by the settings app)" |
774 "backlink to my manager class (needed by the settings app)" |
770 |
775 |
771 ^ GitSourceCodeManager |
776 ^ GitSourceCodeManager |
772 |
777 |
773 "Created: / 19-04-2011 / 12:46:52 / cg" |
778 "Created: / 19-04-2011 / 12:46:52 / cg" |
774 ! ! |
779 ! ! |
|
780 |
775 |
781 |
776 !GitSourceCodeManagementSettingsAppl methodsFor:'actions'! |
782 !GitSourceCodeManagementSettingsAppl methodsFor:'actions'! |
777 |
783 |
778 addModule:module withData:data |
784 addModule:module withData:data |
779 (self listOfModules includes:module) ifFalse:[ |
785 (self listOfModules includes:module) ifFalse:[ |
874 self updateModifiedChannel. |
880 self updateModifiedChannel. |
875 |
881 |
876 "Modified: / 26-01-2012 / 13:50:08 / cg" |
882 "Modified: / 26-01-2012 / 13:50:08 / cg" |
877 ! ! |
883 ! ! |
878 |
884 |
|
885 |
879 !GitSourceCodeManagementSettingsAppl methodsFor:'actions - git'! |
886 !GitSourceCodeManagementSettingsAppl methodsFor:'actions - git'! |
880 |
887 |
881 addPerModuleRoot |
888 addPerModuleRoot |
882 |module gitRepository| |
889 |module gitRepository| |
883 |
890 |
890 self addModule:module withData:(Array with:GitSourceCodeManager with:gitRepository). |
897 self addModule:module withData:(Array with:GitSourceCodeManager with:gitRepository). |
891 ]. |
898 ]. |
892 |
899 |
893 "Modified (format): / 02-03-2012 / 15:22:41 / cg" |
900 "Modified (format): / 02-03-2012 / 15:22:41 / cg" |
894 ! |
901 ! |
895 |
|
896 checkAccess |
|
897 self halt:'unimplemented feature' |
|
898 |
|
899 "Created: / 17-01-2012 / 17:34:53 / cg" |
|
900 ! |
|
901 |
|
902 initializeRepository |
|
903 |repository| |
|
904 |
|
905 repository := self repositoryHolder value. |
|
906 repository isEmptyOrNil ifTrue:[ |
|
907 Dialog warn:(resources string:'No default repository defined.'). |
|
908 ^ self. |
|
909 ]. |
|
910 GitSourceCodeManager initializeForRepository:repository |
|
911 |
|
912 "Created: / 17-01-2012 / 17:42:27 / cg" |
|
913 ! ! |
|
914 |
|
915 !GitSourceCodeManagementSettingsAppl methodsFor:'actions - mercurial'! |
|
916 |
902 |
917 basicSaveGitSettings |
903 basicSaveGitSettings |
918 |gitRepository| |
904 |gitRepository| |
919 |
905 |
920 repositoryHolder notNil ifTrue:[ |
906 repositoryHolder notNil ifTrue:[ |
942 RecentlyUsedRepositoryURLS removeLast. |
928 RecentlyUsedRepositoryURLS removeLast. |
943 ]. |
929 ]. |
944 ]. |
930 ]. |
945 |
931 |
946 "Created: / 02-03-2012 / 15:19:22 / cg" |
932 "Created: / 02-03-2012 / 15:19:22 / cg" |
947 ! ! |
933 ! |
|
934 |
|
935 checkAccess |
|
936 self halt:'unimplemented feature' |
|
937 |
|
938 "Created: / 17-01-2012 / 17:34:53 / cg" |
|
939 ! |
|
940 |
|
941 initializeRepository |
|
942 |repository| |
|
943 |
|
944 repository := self repositoryHolder value. |
|
945 repository isEmptyOrNil ifTrue:[ |
|
946 Dialog warn:(resources string:'No default repository defined.'). |
|
947 ^ self. |
|
948 ]. |
|
949 GitSourceCodeManager initializeForRepository:repository |
|
950 |
|
951 "Created: / 17-01-2012 / 17:42:27 / cg" |
|
952 ! ! |
|
953 |
948 |
954 |
949 !GitSourceCodeManagementSettingsAppl methodsFor:'aspects'! |
955 !GitSourceCodeManagementSettingsAppl methodsFor:'aspects'! |
950 |
956 |
951 gitCommandTimeoutHolder |
957 gitCommandTimeoutHolder |
952 gitCommandTimeoutHolder isNil ifTrue:[ |
958 gitCommandTimeoutHolder isNil ifTrue:[ |
1094 ]. |
1100 ]. |
1095 ^ workDirectoryHolder. |
1101 ^ workDirectoryHolder. |
1096 |
1102 |
1097 "Created: / 03-03-2012 / 10:34:19 / cg" |
1103 "Created: / 03-03-2012 / 10:34:19 / cg" |
1098 ! ! |
1104 ! ! |
|
1105 |
1099 |
1106 |
1100 !GitSourceCodeManagementSettingsAppl methodsFor:'change & update'! |
1107 !GitSourceCodeManagementSettingsAppl methodsFor:'change & update'! |
1101 |
1108 |
1102 selectedPerModuleRepositoryChanged |
1109 selectedPerModuleRepositoryChanged |
1103 |repository entry| |
1110 |repository entry| |
1123 ]. |
1130 ]. |
1124 |
1131 |
1125 "Created: / 14-01-2012 / 20:24:57 / cg" |
1132 "Created: / 14-01-2012 / 20:24:57 / cg" |
1126 ! |
1133 ! |
1127 |
1134 |
1128 |
|
1129 |
|
1130 update:something with:aParameter from:changedObject |
1135 update:something with:aParameter from:changedObject |
1131 |
1136 |
1132 "/ cvs |
1137 "/ cvs |
1133 changedObject == repositoryHolder ifTrue:[ |
1138 changedObject == repositoryHolder ifTrue:[ |
1134 self updateModifiedChannel. |
1139 self updateModifiedChannel. |
1147 super update:something with:aParameter from:changedObject |
1152 super update:something with:aParameter from:changedObject |
1148 |
1153 |
1149 "Modified: / 14-01-2012 / 20:26:51 / cg" |
1154 "Modified: / 14-01-2012 / 20:26:51 / cg" |
1150 ! ! |
1155 ! ! |
1151 |
1156 |
|
1157 |
1152 !GitSourceCodeManagementSettingsAppl methodsFor:'help'! |
1158 !GitSourceCodeManagementSettingsAppl methodsFor:'help'! |
1153 |
1159 |
1154 helpFilename |
1160 helpFilename |
1155 ^ 'Launcher/gitSetup.html' |
1161 ^ 'Launcher/gitSetup.html' |
1156 |
1162 |
1157 "Modified: / 02-03-2012 / 15:20:09 / cg" |
1163 "Modified: / 02-03-2012 / 15:20:09 / cg" |
1158 ! ! |
1164 ! ! |
|
1165 |
1159 |
1166 |
1160 !GitSourceCodeManagementSettingsAppl methodsFor:'initialization & release'! |
1167 !GitSourceCodeManagementSettingsAppl methodsFor:'initialization & release'! |
1161 |
1168 |
1162 initialize |
1169 initialize |
1163 (AbstractSourceCodeManager notNil) ifTrue:[ AbstractSourceCodeManager autoload ]. |
1170 (AbstractSourceCodeManager notNil) ifTrue:[ AbstractSourceCodeManager autoload ]. |
1177 |
1184 |
1178 super initialize. |
1185 super initialize. |
1179 |
1186 |
1180 "Modified: / 02-03-2012 / 15:20:19 / cg" |
1187 "Modified: / 02-03-2012 / 15:20:19 / cg" |
1181 ! ! |
1188 ! ! |
|
1189 |
1182 |
1190 |
1183 !GitSourceCodeManagementSettingsAppl methodsFor:'queries'! |
1191 !GitSourceCodeManagementSettingsAppl methodsFor:'queries'! |
1184 |
1192 |
1185 hasUnsavedChanges |
1193 hasUnsavedChanges |
1186 |modules| |
1194 |modules| |
1216 ^ false |
1224 ^ false |
1217 |
1225 |
1218 "Modified: / 02-03-2012 / 15:20:03 / cg" |
1226 "Modified: / 02-03-2012 / 15:20:03 / cg" |
1219 ! ! |
1227 ! ! |
1220 |
1228 |
|
1229 |
1221 !GitSourceCodeManagementSettingsAppl class methodsFor:'documentation'! |
1230 !GitSourceCodeManagementSettingsAppl class methodsFor:'documentation'! |
1222 |
1231 |
1223 version |
1232 version |
1224 ^ '$Header: /cvs/stx/stx/libtool/GitSourceCodeManagementSettingsAppl.st,v 1.9 2012/08/09 08:59:17 cg Exp $' |
1233 ^ '$Header: /cvs/stx/stx/libtool/GitSourceCodeManagementSettingsAppl.st,v 1.9 2012-08-09 08:59:17 cg Exp $' |
1225 ! |
1234 ! |
1226 |
1235 |
1227 version_CVS |
1236 version_CVS |
1228 ^ '§Header: /cvs/stx/stx/libtool/GitSourceCodeManagementSettingsAppl.st,v 1.9 2012/08/09 08:59:17 cg Exp §' |
1237 ^ '$Header: /cvs/stx/stx/libtool/GitSourceCodeManagementSettingsAppl.st,v 1.9 2012-08-09 08:59:17 cg Exp $' |
1229 ! |
1238 ! |
1230 |
1239 |
1231 version_SVN |
1240 version_SVN |
1232 ^ '$Id: GitSourceCodeManagementSettingsAppl.st 8048 2012-09-07 17:28:09Z vranyj1 $' |
1241 ^ '$Id: GitSourceCodeManagementSettingsAppl.st 8048 2012-09-07 17:28:09Z vranyj1 $' |
1233 ! ! |
1242 ! ! |
|
1243 |