checkin from browser
authorClaus Gittinger <cg@exept.de>
Fri, 23 Apr 1999 16:45:36 +0200
changeset 758 14b304ca1d73
parent 757 a7107de9e420
child 759 2d7e72bae18b
checkin from browser
CVSSCMgr.st
CVSSourceCodeManager.st
--- a/CVSSCMgr.st	Fri Apr 23 14:22:25 1999 +0200
+++ b/CVSSCMgr.st	Fri Apr 23 16:45:36 1999 +0200
@@ -679,6 +679,7 @@
     "return the top of the repository. This handles remote CVS connections
      as well"
 
+    CVSRoot isNil ifTrue:[^ nil].
     ^ self repositoryTopDirectory:CVSRoot.
 
     "
@@ -2898,6 +2899,6 @@
 !CVSSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/Attic/CVSSCMgr.st,v 1.183 1999-04-23 12:00:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/Attic/CVSSCMgr.st,v 1.184 1999-04-23 14:45:36 cg Exp $'
 ! !
 CVSSourceCodeManager initialize!
--- a/CVSSourceCodeManager.st	Fri Apr 23 14:22:25 1999 +0200
+++ b/CVSSourceCodeManager.st	Fri Apr 23 16:45:36 1999 +0200
@@ -679,6 +679,7 @@
     "return the top of the repository. This handles remote CVS connections
      as well"
 
+    CVSRoot isNil ifTrue:[^ nil].
     ^ self repositoryTopDirectory:CVSRoot.
 
     "
@@ -2898,6 +2899,6 @@
 !CVSSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.183 1999-04-23 12:00:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.184 1999-04-23 14:45:36 cg Exp $'
 ! !
 CVSSourceCodeManager initialize!