author | Jan Vrany <jan.vrany@fit.cvut.cz> |
Fri, 14 Dec 2012 20:19:43 +0100 | |
changeset 163 | 21bc6994087d |
parent 162 | 108fc9ee061e |
child 165 | 4f6432cf4240 |
permissions | -rw-r--r-- |
34 | 1 |
"{ Package: 'stx:libscm/mercurial' }" |
2 |
||
3 |
LibraryDefinition subclass:#stx_libscm_mercurial |
|
4 |
instanceVariableNames:'' |
|
5 |
classVariableNames:'' |
|
6 |
poolDictionaries:'' |
|
7 |
category:'* Projects & Packages *' |
|
8 |
! |
|
9 |
||
10 |
||
11 |
!stx_libscm_mercurial class methodsFor:'description'! |
|
12 |
||
13 |
excludedFromPreRequisites |
|
14 |
"list all packages which should be ignored in the automatic |
|
15 |
preRequisites scan. See #preRequisites for more." |
|
16 |
||
17 |
^ #( |
|
18 |
) |
|
19 |
! |
|
20 |
||
21 |
preRequisites |
|
22 |
"list all required packages. |
|
23 |
This list can be maintained manually or (better) generated and |
|
24 |
updated by scanning the superclass hierarchies and looking for |
|
25 |
global variable accesses. (the browser has a menu function for that) |
|
26 |
Howevery, often too much is found, and you may want to explicitely |
|
27 |
exclude individual packages in the #excludedFromPrerequisites method." |
|
28 |
||
29 |
^ #( |
|
163
21bc6994087d
Experimental HGWorkingCopyBrowser - unfinished!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
162
diff
changeset
|
30 |
#'stx:goodies/sunit' "TestAsserter - superclass of HGTestCase " |
21bc6994087d
Experimental HGWorkingCopyBrowser - unfinished!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
162
diff
changeset
|
31 |
#'stx:libbasic' "Collection - superclass of HGChangesetId " |
21bc6994087d
Experimental HGWorkingCopyBrowser - unfinished!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
162
diff
changeset
|
32 |
#'stx:libbasic2' "Singleton - superclass of HGStatus::NotTracked " |
46
d5a192b11a1a
- More Smalltalk/X support
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
40
diff
changeset
|
33 |
#'stx:libbasic3' "AbstractSourceCodeManager - superclass of HGSourceCodeManager " |
163
21bc6994087d
Experimental HGWorkingCopyBrowser - unfinished!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
162
diff
changeset
|
34 |
#'stx:libscm/common' "SCMAbstractPackageModelRegistry - superclass of HGPackageModelRegistry " |
21bc6994087d
Experimental HGWorkingCopyBrowser - unfinished!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
162
diff
changeset
|
35 |
#'stx:libtool' "DirectoryContentsBrowser - superclass of HGWorkingCopyBrowser::DirectoryContentsBrowser " |
21bc6994087d
Experimental HGWorkingCopyBrowser - unfinished!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
162
diff
changeset
|
36 |
#'stx:libview' "Depth8Image - referenced by HGIconLibrary class>>commit " |
21bc6994087d
Experimental HGWorkingCopyBrowser - unfinished!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
162
diff
changeset
|
37 |
#'stx:libview2' "Model - superclass of HGSourceCodeManagementSettingsAppl " |
34 | 38 |
) |
39 |
! ! |
|
40 |
||
41 |
!stx_libscm_mercurial class methodsFor:'description - contents'! |
|
42 |
||
43 |
classNamesAndAttributes |
|
44 |
"lists the classes which are to be included in the project. |
|
45 |
Each entry in the list may be: a single class-name (symbol), |
|
46 |
or an array-literal consisting of class name and attributes. |
|
47 |
Attributes are: #autoload or #<os> where os is one of win32, unix,..." |
|
48 |
||
49 |
^ #( |
|
50 |
"<className> or (<className> attributes...) in load order" |
|
51 |
HGCommand |
|
52 |
HGCommandParser |
|
53 |
(HGRepositoriesResource autoload) |
|
54 |
HGRepository |
|
55 |
HGRepositoryObject |
|
69
17045d49309f
Refactoring: preparation for accessing changeset contents.
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
59
diff
changeset
|
56 |
(HGTestCase autoload) |
34 | 57 |
(HGTests autoload) |
58 |
HGWorkingCopyFile |
|
59 |
#'stx_libscm_mercurial' |
|
60 |
HGBranch |
|
61 |
HGWorkingCopy |
|
103
04731ef44417
HGNodeId renamed to HGChangesetId
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
100
diff
changeset
|
62 |
HGChangesetId |
36 | 63 |
HGStatus |
64 |
HGError |
|
105
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
65 |
HGRepositoryError |
36 | 66 |
HGCommandError |
40
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
39
diff
changeset
|
67 |
(HGCommandParserTests autoload) |
e3699c0b00f9
Baisc support for changesets (revision log)
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
39
diff
changeset
|
68 |
HGChangeset |
46
d5a192b11a1a
- More Smalltalk/X support
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
40
diff
changeset
|
69 |
HGPackageModel |
d5a192b11a1a
- More Smalltalk/X support
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
40
diff
changeset
|
70 |
HGCommitDialog |
d5a192b11a1a
- More Smalltalk/X support
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
40
diff
changeset
|
71 |
HGIconLibrary |
d5a192b11a1a
- More Smalltalk/X support
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
40
diff
changeset
|
72 |
HGPackageModelRegistry |
d5a192b11a1a
- More Smalltalk/X support
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
40
diff
changeset
|
73 |
HGSourceCodeManagementSettingsAppl |
d5a192b11a1a
- More Smalltalk/X support
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
40
diff
changeset
|
74 |
HGSourceCodeManager |
49
ffb879bfafe7
- stx_libscm_mercurial
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
46
diff
changeset
|
75 |
HGAuthorQuery |
51
61700cf82743
- HGCommandParser
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
50
diff
changeset
|
76 |
HGCommandParseError |
54
66045198bfbc
More changes towards self hosting. Some work on model is still missing...
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
51
diff
changeset
|
77 |
HGCommitTask |
69
17045d49309f
Refactoring: preparation for accessing changeset contents.
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
59
diff
changeset
|
78 |
HGChangesetFile |
17045d49309f
Refactoring: preparation for accessing changeset contents.
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
59
diff
changeset
|
79 |
(HGStXTests autoload) |
88 | 80 |
HGRevisionInfo |
81 |
HGRevisionAnnotation |
|
105
25e8ff9d2a31
Added read-only support for branches.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
103
diff
changeset
|
82 |
HGNoSuchBranchError |
135
c74b92e6a2f8
Added HGChangeset>>changes.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
115
diff
changeset
|
83 |
HGChange |
145
1b8652185a8f
Added HGRepository>>config.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
135
diff
changeset
|
84 |
HGConfig |
146
1015b8f6dc1c
Added check for author signature before commit.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
145
diff
changeset
|
85 |
HGCommitError |
150
1813913f6106
Addec HGRepositoru>>remotes returning list of remote repositories.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
146
diff
changeset
|
86 |
HGRemote |
151
527a1e85aef8
Support for 'autopush' in commit dialog.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
150
diff
changeset
|
87 |
HGPushError |
527a1e85aef8
Support for 'autopush' in commit dialog.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
150
diff
changeset
|
88 |
HGPushWouldCreateNewHeadError |
162
108fc9ee061e
Added HGWorkingCopyBrowser.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
161
diff
changeset
|
89 |
HGWorkingCopyBrowser |
34 | 90 |
) |
91 |
! |
|
92 |
||
93 |
extensionMethodNames |
|
94 |
"lists the extension methods which are to be included in the project. |
|
95 |
Entries are 2-element array literals, consisting of class-name and selector." |
|
96 |
||
97 |
^ #( |
|
103
04731ef44417
HGNodeId renamed to HGChangesetId
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
100
diff
changeset
|
98 |
ByteArray asHGChangesetId |
04731ef44417
HGNodeId renamed to HGChangesetId
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
100
diff
changeset
|
99 |
Integer asHGChangesetId |
04731ef44417
HGNodeId renamed to HGChangesetId
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
100
diff
changeset
|
100 |
Object asHGChangesetId |
04731ef44417
HGNodeId renamed to HGChangesetId
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
100
diff
changeset
|
101 |
String asHGChangesetId |
80
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
102 |
UserPreferences hgCommand |
8f300696b26b
Added configurable path to 'hg' command.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
69
diff
changeset
|
103 |
UserPreferences hgCommand: |
151
527a1e85aef8
Support for 'autopush' in commit dialog.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
150
diff
changeset
|
104 |
UserPreferences hgAutopush |
527a1e85aef8
Support for 'autopush' in commit dialog.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
150
diff
changeset
|
105 |
UserPreferences hgAutopush: |
88 | 106 |
Object asHGRevision |
107 |
'Annotation class' HGRevision: |
|
108 |
'ProjectDefinition class' hgBinaryRevision |
|
109 |
'ProjectDefinition class' hgLogicalRevision |
|
107
c92f7674485e
Fixed test StXTests>>test_commit_03c
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
105
diff
changeset
|
110 |
'ProjectDefinition class' hgPostLoad |
154
c1221bf5f357
Added 'Push' menu to system browser.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
151
diff
changeset
|
111 |
#'Tools::NewSystemBrowser' commonMenuHGBrowseWorkingCopy |
c1221bf5f357
Added 'Push' menu to system browser.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
151
diff
changeset
|
112 |
#'Tools::NewSystemBrowser' selectedProjectsForHG |
c1221bf5f357
Added 'Push' menu to system browser.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
151
diff
changeset
|
113 |
'Tools::NewSystemBrowser class' #'classMenuSCMExtra_HG' |
c1221bf5f357
Added 'Push' menu to system browser.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
151
diff
changeset
|
114 |
'Tools::NewSystemBrowser class' #'projectMenuSCMExtra_HG' |
161
ed22df640210
Bugfix: added lost NewSystemBrowser>>commonMenuHGPushSlice.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
159
diff
changeset
|
115 |
#'Tools::NewSystemBrowser' commonMenuHGPushSlice |
162
108fc9ee061e
Added HGWorkingCopyBrowser.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
161
diff
changeset
|
116 |
'AbstractFileBrowser class' hgMenu |
108fc9ee061e
Added HGWorkingCopyBrowser.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
161
diff
changeset
|
117 |
'ConfigurableFeatures class' hasHGSupport |
108fc9ee061e
Added HGWorkingCopyBrowser.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
161
diff
changeset
|
118 |
'ConfigurableFeatures class' hasHGSupportEnabled |
163
21bc6994087d
Experimental HGWorkingCopyBrowser - unfinished!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
162
diff
changeset
|
119 |
AbstractFileBrowser currentHgRepository |
21bc6994087d
Experimental HGWorkingCopyBrowser - unfinished!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
162
diff
changeset
|
120 |
AbstractFileBrowser hasHGWorkingCopySelected |
34 | 121 |
) |
122 |
! ! |
|
123 |
||
124 |
!stx_libscm_mercurial class methodsFor:'description - project information'! |
|
125 |
||
126 |
applicationIconFileName |
|
127 |
"Return the name (without suffix) of an icon-file (the app's icon); will be included in the rc-resource file" |
|
128 |
||
129 |
^ nil |
|
130 |
"/ ^ self applicationName |
|
131 |
! |
|
132 |
||
133 |
companyName |
|
134 |
"Return a companyname which will appear in <lib>.rc" |
|
135 |
||
100
7e2196730455
Test fixes. Added library description & copyright.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
136 |
^ 'Jan Vrany' |
7e2196730455
Test fixes. Added library description & copyright.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
137 |
|
7e2196730455
Test fixes. Added library description & copyright.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
138 |
"Modified: / 23-11-2012 / 20:27:04 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
34 | 139 |
! |
140 |
||
141 |
description |
|
142 |
"Return a description string which will appear in vc.def / bc.def" |
|
143 |
||
100
7e2196730455
Test fixes. Added library description & copyright.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
144 |
^ 'Mercurial integration for Smalltalk/X' |
7e2196730455
Test fixes. Added library description & copyright.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
145 |
|
7e2196730455
Test fixes. Added library description & copyright.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
146 |
"Modified: / 23-11-2012 / 20:27:26 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
34 | 147 |
! |
148 |
||
149 |
legalCopyright |
|
150 |
"Return a copyright string which will appear in <lib>.rc" |
|
151 |
||
100
7e2196730455
Test fixes. Added library description & copyright.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
152 |
^ 'Copyright Jan Vrany 2012' |
7e2196730455
Test fixes. Added library description & copyright.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
153 |
|
7e2196730455
Test fixes. Added library description & copyright.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
154 |
"Modified: / 23-11-2012 / 20:27:46 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
34 | 155 |
! |
156 |
||
157 |
productInstallDirBaseName |
|
158 |
"Returns a default installDir which will appear in <app>.nsi. |
|
159 |
This is usually not the one you want to keep" |
|
160 |
||
161 |
^ (self package asCollectionOfSubstringsSeparatedByAny:':/') last |
|
162 |
! |
|
163 |
||
164 |
productName |
|
165 |
"Return a product name which will appear in <lib>.rc" |
|
166 |
||
100
7e2196730455
Test fixes. Added library description & copyright.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
167 |
^ 'Smalltalk/X Mercurial Integration' |
7e2196730455
Test fixes. Added library description & copyright.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
168 |
|
7e2196730455
Test fixes. Added library description & copyright.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
88
diff
changeset
|
169 |
"Modified: / 23-11-2012 / 20:28:01 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
34 | 170 |
! ! |
171 |
||
172 |
!stx_libscm_mercurial class methodsFor:'description - svn'! |
|
173 |
||
174 |
svnRepositoryUrlString |
|
175 |
"Return a SVN repository URL of myself. |
|
176 |
(Generated since 2011-04-08) |
|
177 |
Do not make the string shorter!!!!!! We have to use fixed-length keyword!!!!!! |
|
178 |
" |
|
179 |
||
180 |
^ '$URL:: $' |
|
181 |
! |
|
182 |
||
183 |
svnRevisionNr |
|
184 |
"Return a SVN revision number of myself. |
|
185 |
This number is updated after a commit" |
|
186 |
||
187 |
^ "$SVN-Revision:"'nil '"$" |
|
188 |
! ! |
|
189 |
||
190 |
!stx_libscm_mercurial class methodsFor:'documentation'! |
|
191 |
||
54
66045198bfbc
More changes towards self hosting. Some work on model is still missing...
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
51
diff
changeset
|
192 |
version_HG |
115
b1ed2d29054b
version_HG changed to return string.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
107
diff
changeset
|
193 |
|
b1ed2d29054b
version_HG changed to return string.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
107
diff
changeset
|
194 |
^ '$Changeset: <not expanded> $' |
54
66045198bfbc
More changes towards self hosting. Some work on model is still missing...
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
51
diff
changeset
|
195 |
! |
66045198bfbc
More changes towards self hosting. Some work on model is still missing...
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
51
diff
changeset
|
196 |
|
34 | 197 |
version_SVN |
59
b8722ad42c3b
Removed dependency on git
vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
parents:
54
diff
changeset
|
198 |
^ '§Id:: §' |
34 | 199 |
! ! |