changed: #revisionLogOf:fromRevision:toRevision:numberOfRevisions:fileName:directory:module:
authorStefan Vogel <sv@exept.de>
Thu, 05 Apr 2012 12:20:03 +0200
changeset 2820 d6e9f3f4621c
parent 2819 450f48a124db
child 2821 687ec021401e
changed: #revisionLogOf:fromRevision:toRevision:numberOfRevisions:fileName:directory:module: avoid useless "empty log" messages
CVSSourceCodeManager.st
--- 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!