CVSSourceCodeManager.st
changeset 2820 d6e9f3f4621c
parent 2814 e93c0aa8c45f
child 2822 8c1a217f0755
--- a/CVSSourceCodeManager.st	Thu Apr 05 12:02:38 2012 +0200
+++ b/CVSSourceCodeManager.st	Thu Apr 05 12:20:03 2012 +0200
@@ -4423,10 +4423,6 @@
             ('CVSSourceCodeManager [warning]: no log for ', fullName) errorPrintCR.
             ^ nil
         ].
-        inStream atEnd ifTrue:[
-            ('CVSSourceCodeManager [warning]: empty log for ', fullName) errorPrintCR.
-            ^ nil
-        ].
 
         "/ strip selected revisions from the total-revisions entry
         s := info at:#numberOfRevisions.
@@ -4440,6 +4436,11 @@
             "/ continue to read the commands pipe output 
             "/ and extract revision info records
             "/
+            inStream atEnd ifTrue:[
+                ('CVSSourceCodeManager [warning]: empty log for ', fullName) errorPrintCR.
+                ^ nil
+            ].
+
             revisionRecords := OrderedCollection new:(info at:#numberOfRevisions).
             info at:#revisions put:revisionRecords.
 
@@ -5068,11 +5069,11 @@
 !CVSSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.432 2012-03-20 18:07:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.433 2012-04-05 10:20:03 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.432 2012-03-20 18:07:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.433 2012-04-05 10:20:03 stefan Exp $'
 ! !
 
 CVSSourceCodeManager initialize!