--- a/SVN__RepositoryManager.st	Mon Sep 28 11:33:25 2009 +0200
+++ b/SVN__RepositoryManager.st	Mon Sep 28 12:14:24 2009 +0200
@@ -11,6 +11,10 @@
 
 !RepositoryManager class methodsFor:'documentation'!
 
+version_CVS
+    ^ '$Header$'
+!
+
 version_SVN
     ^'$Id$'
 ! !
@@ -304,6 +308,7 @@
      terminates. If there is no image, removes working copy.
     "
 
+    workingCopyBase isNil ifTrue: [^self].
     workingCopyBase asFilename exists ifFalse:[^self].
 
     ObjectMemory imageName