checkin from browser
authorClaus Gittinger <cg@exept.de>
Fri, 07 Sep 2001 16:35:56 +0200
changeset 1069 860c5e37c282
parent 1068 200fbe3c8bf3
child 1070 3f87ae65a554
checkin from browser
AbstractSourceCodeManager.st
CVSSourceCodeManager.st
--- a/AbstractSourceCodeManager.st	Fri Sep 07 16:35:33 2001 +0200
+++ b/AbstractSourceCodeManager.st	Fri Sep 07 16:35:56 2001 +0200
@@ -1577,7 +1577,7 @@
             #container          -> the RCS container file name 
             #filename           -> the actual source file name
             #newestRevision     -> the revisionString of the newest revision
-            #numberOfRevisions  -> the number of revisions in the container
+            #numberOfRevisions  -> the number of revisions in the container (nil for all)
             #revisions          -> collection of per-revision info (see below)
 
          for some classes, additional info is returned:
@@ -1982,6 +1982,6 @@
 !AbstractSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.144 2001-09-03 09:05:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.145 2001-09-07 14:35:53 cg Exp $'
 ! !
 AbstractSourceCodeManager initialize!
--- a/CVSSourceCodeManager.st	Fri Sep 07 16:35:33 2001 +0200
+++ b/CVSSourceCodeManager.st	Fri Sep 07 16:35:56 2001 +0200
@@ -3696,7 +3696,7 @@
             #cvsRoot            -> the CVS root (repository) 
             #filename           -> the actual source file name
             #newestRevision     -> the revisionString of the newest revision
-            #numberOfRevisions  -> the number of revisions in the container
+            #numberOfRevisions  -> the number of revisions in the container (nil for all)
             #revisions          -> collection of per-revision info (see below)
 
             rev1 / rev2 specify from which revisions a logEntry is wanted:
@@ -3927,7 +3927,7 @@
             #container          -> the RCS container file name 
             #filename           -> the actual source file name
             #newestRevision     -> the revisionString of the newest revision
-            #numberOfRevisions  -> the number of revisions in the container
+            #numberOfRevisions  -> the number of revisions in the container (nil for all)
             #revisions          -> collection of per-revision info (see below)
 
             rev1 / rev2 specify from which revisions a logEntry is wanted:
@@ -4056,7 +4056,7 @@
             ] ifFalse:[
                 revisionRecords add:record.
             ].
-            revisionRecords size >= numRevisions ifTrue:[
+            (numRevisions notNil and:[revisionRecords size >= numRevisions]) ifTrue:[
                 atEnd := true
             ]
         ].
@@ -4182,6 +4182,6 @@
 !CVSSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.234 2001-09-03 13:06:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.235 2001-09-07 14:35:56 cg Exp $'
 ! !
 CVSSourceCodeManager initialize!