equal
deleted
inserted
replaced
10 hereby transferred. |
10 hereby transferred. |
11 " |
11 " |
12 "{ Package: 'stx:libtool' }" |
12 "{ Package: 'stx:libtool' }" |
13 |
13 |
14 AbstractSourceCodeManagementSettingsAppl subclass:#CVSSourceCodeManagementSettingsAppl |
14 AbstractSourceCodeManagementSettingsAppl subclass:#CVSSourceCodeManagementSettingsAppl |
15 instanceVariableNames:'repositoryHolder manager repository listOfModules |
15 instanceVariableNames:'repositoryHolder manager repository cvsRootPrototypeList |
16 cvsRootPrototypeList addPerModuleRoot removeEnabled |
16 addPerModuleRoot perModuleRootModule removePerModuleRoot |
17 perModuleRootModule removePerModuleRoot perModuleRoot |
17 perModuleRoot cvsRootHolder selectedPerModuleRoot |
18 cvsRootHolder selectedPerModuleRoot cvsBinDirectoryHolder |
18 cvsBinDirectoryHolder cvsExecutableHolder cvsCommandTimeoutHolder |
19 cvsExecutableHolder cvsCommandTimeoutHolder rootsPerModule |
19 rootsPerModule cvsLoginInModuleEnabled cvsLoginEnabled' |
20 cvsLoginInModuleEnabled cvsLoginEnabled' |
|
21 classVariableNames:'RecentlyUsedCVSRoots' |
20 classVariableNames:'RecentlyUsedCVSRoots' |
22 poolDictionaries:'' |
21 poolDictionaries:'' |
23 category:'System-SourceCodeManagement' |
22 category:'System-SourceCodeManagement' |
24 ! |
23 ! |
25 |
24 |
42 documentation |
41 documentation |
43 " |
42 " |
44 CVS part of the source code settings. |
43 CVS part of the source code settings. |
45 This settings app controls the parameters of the CVSSourceCodeManager. |
44 This settings app controls the parameters of the CVSSourceCodeManager. |
46 |
45 |
47 Extrated for pluggability from SourceCodeManagerSettings in the AbstractSettingsApplication. |
46 Extracted for pluggability from SourceCodeManagerSettings in the AbstractSettingsApplication. |
48 " |
47 " |
49 ! ! |
48 ! ! |
50 |
49 |
51 !CVSSourceCodeManagementSettingsAppl class methodsFor:'defaults'! |
50 !CVSSourceCodeManagementSettingsAppl class methodsFor:'defaults'! |
52 |
51 |
274 labelPosition: topLeft |
273 labelPosition: topLeft |
275 translateLabel: true |
274 translateLabel: true |
276 component: |
275 component: |
277 (SpecCollection |
276 (SpecCollection |
278 collection: ( |
277 collection: ( |
|
278 (ComboBoxSpec |
|
279 name: 'ComboBox1' |
|
280 layout: (LayoutFrame 64 0.25 275 0 0 1 297 0) |
|
281 activeHelpKey: cvsRootPerModuleModule |
|
282 tabable: true |
|
283 model: perModuleRootModule |
|
284 acceptChannel: acceptChannel |
|
285 acceptOnPointerLeave: true |
|
286 comboList: sampleModuleList |
|
287 ) |
279 (CheckBoxSpec |
288 (CheckBoxSpec |
280 label: 'Show in Browser Menus' |
289 label: 'Show in Browser Menus' |
281 name: 'CheckBox1' |
290 name: 'CheckBox1' |
282 layout: (LayoutFrame 0 0 5 0 0 1 27 0) |
291 layout: (LayoutFrame 0 0 5 0 0 1 27 0) |
283 activeHelpKey: shownInBrowserMenus |
292 activeHelpKey: shownInBrowserMenus |
410 name: 'moduleLabel' |
419 name: 'moduleLabel' |
411 layout: (LayoutFrame 0 0.0 279 0 60 0.25 296 0) |
420 layout: (LayoutFrame 0 0.0 279 0 60 0.25 296 0) |
412 activeHelpKey: cvsRootPerModuleModule |
421 activeHelpKey: cvsRootPerModuleModule |
413 translateLabel: true |
422 translateLabel: true |
414 adjust: right |
423 adjust: right |
415 ) |
|
416 (InputFieldSpec |
|
417 name: 'perModuleRootModuleEntryField' |
|
418 layout: (LayoutFrame 64 0.25 275 0 0 1 297 0) |
|
419 activeHelpKey: cvsRootPerModuleModule |
|
420 tabable: true |
|
421 model: perModuleRootModule |
|
422 acceptChannel: acceptChannel |
|
423 acceptOnPointerLeave: true |
|
424 ) |
424 ) |
425 (LabelSpec |
425 (LabelSpec |
426 label: 'CVSRoot:' |
426 label: 'CVSRoot:' |
427 name: 'cvsRootLabel' |
427 name: 'cvsRootLabel' |
428 layout: (LayoutFrame 0 0.0 304 0 60 0.25 321 0) |
428 layout: (LayoutFrame 0 0.0 304 0 60 0.25 321 0) |
682 self acceptChannel value. |
682 self acceptChannel value. |
683 |
683 |
684 "Modified: / 08-01-2012 / 18:59:58 / cg" |
684 "Modified: / 08-01-2012 / 18:59:58 / cg" |
685 ! |
685 ! |
686 |
686 |
687 condenseSourceCache |
687 |
688 self withWaitCursorDo:[ AbstractSourceCodeManager condenseSourceCache ]. |
688 |
689 Method flushSourceStreamCache. |
689 |
690 |
|
691 "Modified: / 28-11-2006 / 12:21:33 / cg" |
|
692 ! |
|
693 |
|
694 flushSourceCache |
|
695 self withWaitCursorDo:[ AbstractSourceCodeManager flushSourceCache ]. |
|
696 |
|
697 "Modified: / 30-09-2011 / 13:33:47 / cg" |
|
698 ! |
|
699 |
690 |
700 removePerModuleRoot |
691 removePerModuleRoot |
701 |module| |
692 |module| |
702 |
693 |
703 acceptChannel value:true. |
694 acceptChannel value:true. |
873 ^ cvsRootPrototypeList. |
864 ^ cvsRootPrototypeList. |
874 |
865 |
875 "Modified: / 20-01-2012 / 16:17:35 / cg" |
866 "Modified: / 20-01-2012 / 16:17:35 / cg" |
876 ! |
867 ! |
877 |
868 |
878 listOfModules |
869 initialListOfModules |
879 |
870 ^ rootsPerModule keys asList sort. |
880 listOfModules isNil ifTrue:[ |
871 |
881 rootsPerModule notNil ifTrue:[ |
872 "Created: / 02-03-2012 / 14:39:15 / cg" |
882 listOfModules := rootsPerModule keys asList. |
873 ! |
883 ]. |
874 |
884 listOfModules sort. |
875 |
885 listOfModules onChangeSend:#updateModifiedChannel to:self |
|
886 ]. |
|
887 ^ listOfModules. |
|
888 ! |
|
889 |
876 |
890 perModuleRoot |
877 perModuleRoot |
891 perModuleRoot isNil ifTrue:[ |
878 perModuleRoot isNil ifTrue:[ |
892 perModuleRoot := ValueHolder new. |
879 perModuleRoot := ValueHolder new. |
893 perModuleRoot addDependent:self. |
880 perModuleRoot addDependent:self. |
900 perModuleRootModule := ValueHolder new. |
887 perModuleRootModule := ValueHolder new. |
901 ]. |
888 ]. |
902 ^ perModuleRootModule. |
889 ^ perModuleRootModule. |
903 ! |
890 ! |
904 |
891 |
905 removeEnabled |
892 |
906 |
|
907 removeEnabled isNil ifTrue:[ |
|
908 removeEnabled := false asValue. |
|
909 ]. |
|
910 ^ removeEnabled. |
|
911 ! |
|
912 |
893 |
913 selectedPerModuleRoot |
894 selectedPerModuleRoot |
914 selectedPerModuleRoot isNil ifTrue:[ |
895 selectedPerModuleRoot isNil ifTrue:[ |
915 selectedPerModuleRoot := ValueHolder new. |
896 selectedPerModuleRoot := ValueHolder new. |
916 selectedPerModuleRoot addDependent:self. |
897 selectedPerModuleRoot addDependent:self. |
917 ]. |
898 ]. |
918 ^ selectedPerModuleRoot. |
899 ^ selectedPerModuleRoot. |
919 ! |
900 ! |
920 |
901 |
921 verboseSourceCodeAccess |
902 ! |
922 verboseSourceCodeAccess isNil ifTrue:[ |
|
923 verboseSourceCodeAccess := false asValue. |
|
924 verboseSourceCodeAccess onChangeSend:#updateModifiedChannel to:self |
|
925 ]. |
|
926 ^ verboseSourceCodeAccess. |
|
927 ! ! |
|
928 |
903 |
929 !CVSSourceCodeManagementSettingsAppl methodsFor:'change & update'! |
904 !CVSSourceCodeManagementSettingsAppl methodsFor:'change & update'! |
930 |
905 |
931 selectedPerModuleRootChanged |
906 selectedPerModuleRootChanged |
932 |module entry| |
907 |module entry| |
1131 ! ! |
1106 ! ! |
1132 |
1107 |
1133 !CVSSourceCodeManagementSettingsAppl class methodsFor:'documentation'! |
1108 !CVSSourceCodeManagementSettingsAppl class methodsFor:'documentation'! |
1134 |
1109 |
1135 version |
1110 version |
1136 ^ '$Id: CVSSourceCodeManagementSettingsAppl.st 7854 2012-01-30 17:49:41Z vranyj1 $' |
1111 ^ '$Header: /cvs/stx/stx/libtool/CVSSourceCodeManagementSettingsAppl.st,v 1.23 2012/03/12 11:03:03 cg Exp $' |
1137 ! |
1112 ! |
1138 |
1113 |
1139 version_CVS |
1114 version_CVS |
1140 ^ '§Header: /cvs/stx/stx/libtool/CVSSourceCodeManagementSettingsAppl.st,v 1.19 2012/01/22 12:05:42 cg Exp §' |
1115 ^ '§Header: /cvs/stx/stx/libtool/CVSSourceCodeManagementSettingsAppl.st,v 1.23 2012/03/12 11:03:03 cg Exp §' |
1141 ! |
1116 ! |
1142 |
1117 |
1143 version_SVN |
1118 version_SVN |
1144 ^ '$Id: CVSSourceCodeManagementSettingsAppl.st 7854 2012-01-30 17:49:41Z vranyj1 $' |
1119 ^ '$Id: CVSSourceCodeManagementSettingsAppl.st 7952 2012-03-21 17:50:14Z vranyj1 $' |
1145 ! ! |
1120 ! ! |