--- a/AbstractRevisionItem.st Fri Feb 18 14:39:31 2000 +0100
+++ b/AbstractRevisionItem.st Fri Feb 18 15:02:06 2000 +0100
@@ -9,7 +9,7 @@
documentation
"
- documentation to be added.
+ This is not yet finished (work in progress) - do not use.
[author:]
Pierre Schwarz (ps@exept.de)
@@ -117,5 +117,5 @@
!AbstractRevisionItem class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/AbstractRevisionItem.st,v 1.3 2000-02-15 16:49:12 ps Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractRevisionItem.st,v 1.4 2000-02-18 14:02:06 cg Exp $'
! !
--- a/AbstractVersionDiffBrowserItem.st Fri Feb 18 14:39:31 2000 +0100
+++ b/AbstractVersionDiffBrowserItem.st Fri Feb 18 15:02:06 2000 +0100
@@ -9,7 +9,7 @@
documentation
"
- documentation to be added.
+ This is not yet finished (work in progress) - do not use.
[author:]
Pierre Schwarz (ps@exept.de)
@@ -124,5 +124,5 @@
!AbstractVersionDiffBrowserItem class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/AbstractVersionDiffBrowserItem.st,v 1.3 2000-02-15 16:47:37 ps Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractVersionDiffBrowserItem.st,v 1.4 2000-02-18 14:01:55 cg Exp $'
! !
--- a/ClassItem.st Fri Feb 18 14:39:31 2000 +0100
+++ b/ClassItem.st Fri Feb 18 15:02:06 2000 +0100
@@ -9,7 +9,7 @@
documentation
"
- documentation to be added.
+ This is not yet finished (work in progress) - do not use.
[author:]
Pierre Schwarz (ps@exept.de)
@@ -232,5 +232,5 @@
!ClassItem class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/ClassItem.st,v 1.6 2000-02-15 16:49:13 ps Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/ClassItem.st,v 1.7 2000-02-18 14:01:44 cg Exp $'
! !
--- a/ClassItemRoot.st Fri Feb 18 14:39:31 2000 +0100
+++ b/ClassItemRoot.st Fri Feb 18 15:02:06 2000 +0100
@@ -9,7 +9,7 @@
documentation
"
- documentation to be added.
+ This is not yet finished (work in progress) - do not use.
[author:]
Pierre Schwarz (ps@exept.de)
@@ -58,18 +58,12 @@
"
children ifNil:[
- children := self computeChildrensFor:parent classRevisionColl.
+ children := self computeChildrensFor:parent dataColl.
children do:[:eachChild | eachChild parent:self]
].
^ children
-
-
-
-
-
-
-
+ "Modified: / 18.2.2000 / 15:02:12 / cg"
!
computeChildrensFor:aClassColl
@@ -110,5 +104,5 @@
!ClassItemRoot class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/ClassItemRoot.st,v 1.4 2000-02-15 16:48:28 ps Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/ClassItemRoot.st,v 1.5 2000-02-18 14:01:35 cg Exp $'
! !
--- a/ClassItemRootForRevision.st Fri Feb 18 14:39:31 2000 +0100
+++ b/ClassItemRootForRevision.st Fri Feb 18 15:02:06 2000 +0100
@@ -5,6 +5,23 @@
category:'Interface-Browsers-Support'
!
+!ClassItemRootForRevision class methodsFor:'documentation'!
+
+documentation
+"
+ This is not yet finished (work in progress) - do not use.
+
+ [author:]
+ Pierre Schwarz (ps@exept.de)
+
+ [see also:]
+
+ [instance variables:]
+
+ [class variables:]
+"
+
+! !
!ClassItemRootForRevision class methodsFor:'accessing'!
@@ -24,7 +41,7 @@
<return: OrderedCollection|nil>
"
|theClassItemColl|
- self halt.
+
aClassRevisionColl ifNil:[^#()].
theClassItemColl := aClassRevisionColl collect:[:eachClassRevision |
|theClassItem theClass|
@@ -33,7 +50,7 @@
theClassItem].
^theClassItemColl
-
+ "Modified: / 18.2.2000 / 15:04:31 / cg"
!
doubleClickOn:anItem
@@ -45,5 +62,5 @@
!ClassItemRootForRevision class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/ClassItemRootForRevision.st,v 1.1 2000-02-15 16:49:32 ps Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/ClassItemRootForRevision.st,v 1.2 2000-02-18 14:01:23 cg Exp $'
! !
--- a/ClassNameItem.st Fri Feb 18 14:39:31 2000 +0100
+++ b/ClassNameItem.st Fri Feb 18 15:02:06 2000 +0100
@@ -5,6 +5,23 @@
category:'Interface-Browsers-Support'
!
+!ClassNameItem class methodsFor:'documentation'!
+
+documentation
+"
+ This is not yet finished (work in progress) - do not use.
+
+ [author:]
+ Pierre Schwarz (ps@exept.de)
+
+ [see also:]
+
+ [instance variables:]
+
+ [class variables:]
+"
+
+! !
!ClassNameItem class methodsFor:'image specs'!
@@ -111,5 +128,5 @@
!ClassNameItem class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/ClassNameItem.st,v 1.1 2000-02-15 16:49:25 ps Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/ClassNameItem.st,v 1.2 2000-02-18 14:01:13 cg Exp $'
! !
--- a/ClassRevisionTree.st Fri Feb 18 14:39:31 2000 +0100
+++ b/ClassRevisionTree.st Fri Feb 18 15:02:06 2000 +0100
@@ -10,7 +10,7 @@
documentation
"
- documentation to be added.
+ This is not yet finished (work in progress) - do not use.
[author:]
Pierre Schwarz (ps@exept.de)
@@ -364,8 +364,9 @@
setUpList
- self halt.
^self hierarchicalList newData: self dataHolder value
+
+ "Modified: / 18.2.2000 / 15:05:35 / cg"
! !
!ClassRevisionTree methodsFor:'protocol accessing'!
@@ -439,5 +440,5 @@
!ClassRevisionTree class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/ClassRevisionTree.st,v 1.7 2000-02-15 16:49:16 ps Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/ClassRevisionTree.st,v 1.8 2000-02-18 14:01:02 cg Exp $'
! !
--- a/HierarchicalClassRevisionList.st Fri Feb 18 14:39:31 2000 +0100
+++ b/HierarchicalClassRevisionList.st Fri Feb 18 15:02:06 2000 +0100
@@ -6,6 +6,23 @@
category:'Interface-Browsers-Support'
!
+!HierarchicalClassRevisionList class methodsFor:'documentation'!
+
+documentation
+"
+ This is not yet finished (work in progress) - do not use.
+
+ [author:]
+ Pierre Schwarz (ps@exept.de)
+
+ [see also:]
+
+ [instance variables:]
+
+ [class variables:]
+"
+
+! !
!HierarchicalClassRevisionList class methodsFor:'instance creation'!
@@ -158,5 +175,5 @@
!HierarchicalClassRevisionList class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/HierarchicalClassRevisionList.st,v 1.1 2000-02-15 16:49:08 ps Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/HierarchicalClassRevisionList.st,v 1.2 2000-02-18 14:00:49 cg Exp $'
! !
--- a/SourceRevisionItem.st Fri Feb 18 14:39:31 2000 +0100
+++ b/SourceRevisionItem.st Fri Feb 18 15:02:06 2000 +0100
@@ -9,7 +9,7 @@
documentation
"
- documentation to be added.
+ This is not yet finished (work in progress) - do not use.
[author:]
Pierre Schwarz (ps@exept.de)
@@ -99,5 +99,5 @@
!SourceRevisionItem class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/SourceRevisionItem.st,v 1.4 2000-02-15 16:49:11 ps Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/SourceRevisionItem.st,v 1.5 2000-02-18 14:00:39 cg Exp $'
! !
--- a/VersionRevisionItem.st Fri Feb 18 14:39:31 2000 +0100
+++ b/VersionRevisionItem.st Fri Feb 18 15:02:06 2000 +0100
@@ -9,7 +9,7 @@
documentation
"
- documentation to be added.
+ This is not yet finished (work in progress) - do not use.
[author:]
Pierre Schwarz (ps@exept.de)
@@ -84,5 +84,5 @@
!VersionRevisionItem class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/VersionRevisionItem.st,v 1.4 2000-02-15 16:49:27 ps Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/VersionRevisionItem.st,v 1.5 2000-02-18 14:00:28 cg Exp $'
! !