equal
deleted
inserted
replaced
3 classVariableNames:'' |
3 classVariableNames:'' |
4 poolDictionaries:'' |
4 poolDictionaries:'' |
5 category:'Interface-Browsers-Support' |
5 category:'Interface-Browsers-Support' |
6 ! |
6 ! |
7 |
7 |
|
8 !ClassItemRootForRevision class methodsFor:'documentation'! |
|
9 |
|
10 documentation |
|
11 " |
|
12 This is not yet finished (work in progress) - do not use. |
|
13 |
|
14 [author:] |
|
15 Pierre Schwarz (ps@exept.de) |
|
16 |
|
17 [see also:] |
|
18 |
|
19 [instance variables:] |
|
20 |
|
21 [class variables:] |
|
22 " |
|
23 |
|
24 ! ! |
8 |
25 |
9 !ClassItemRootForRevision class methodsFor:'accessing'! |
26 !ClassItemRootForRevision class methodsFor:'accessing'! |
10 |
27 |
11 classItemClass |
28 classItemClass |
12 |
29 |
22 " |
39 " |
23 |
40 |
24 <return: OrderedCollection|nil> |
41 <return: OrderedCollection|nil> |
25 " |
42 " |
26 |theClassItemColl| |
43 |theClassItemColl| |
27 self halt. |
44 |
28 aClassRevisionColl ifNil:[^#()]. |
45 aClassRevisionColl ifNil:[^#()]. |
29 theClassItemColl := aClassRevisionColl collect:[:eachClassRevision | |
46 theClassItemColl := aClassRevisionColl collect:[:eachClassRevision | |
30 |theClassItem theClass| |
47 |theClassItem theClass| |
31 theClassItem := self classItemClass new. |
48 theClassItem := self classItemClass new. |
32 theClassItem revisionInfo:eachClassRevision. |
49 theClassItem revisionInfo:eachClassRevision. |
33 theClassItem]. |
50 theClassItem]. |
34 ^theClassItemColl |
51 ^theClassItemColl |
35 |
52 |
36 |
53 "Modified: / 18.2.2000 / 15:04:31 / cg" |
37 ! |
54 ! |
38 |
55 |
39 doubleClickOn:anItem |
56 doubleClickOn:anItem |
40 |
57 |
41 |
58 |
43 ! ! |
60 ! ! |
44 |
61 |
45 !ClassItemRootForRevision class methodsFor:'documentation'! |
62 !ClassItemRootForRevision class methodsFor:'documentation'! |
46 |
63 |
47 version |
64 version |
48 ^ '$Header: /cvs/stx/stx/libtool/ClassItemRootForRevision.st,v 1.1 2000-02-15 16:49:32 ps Exp $' |
65 ^ '$Header: /cvs/stx/stx/libtool/ClassItemRootForRevision.st,v 1.2 2000-02-18 14:01:23 cg Exp $' |
49 ! ! |
66 ! ! |