--- a/CVSSourceCodeManager.st	Thu Jan 05 21:04:07 2017 +0000
+++ b/CVSSourceCodeManager.st	Fri Jan 13 23:33:19 2017 +0000
@@ -3164,27 +3164,31 @@
         errorStream := '' writeStream.
         outputStream := '' writeStream.
         
-        ret := self 
-                    executeCVSCommand:cmd , fullName 
-                    module:moduleDir 
-                    "/ cg; cannot do it in current dir, in case it contains a CVS subDirectory,
-                    "/ with a different CVSRoot in its CVS/Root file ...
-                    "/ cvs would complain then.
-                    inDirectory:(tempDir pathName) 
-                    log:false
-                    outputTo:outputStream
-                    errorTo:errorStream.
-
-        "cannot check for exit status starting at cvs 1.11.5, because an exit status 0
-         is returned even if the file does not exist"
-
-        "But: if there is any output, the command failed and the container does not exist"
-        "/ cg: read comment above.
-        ret2 := errorStream size == 0.
-        ret2 ifFalse:[
-            ret2 := (errorStream contents asCollectionOfLines 
-                        reject:[:l | l isBlank or:[(l includesString:'WARNING:')] ]) size == 0 
-        ].
+        SourceCodeManagerError handle:[:ex |
+            ^ false.
+        ] do:[    
+            ret := self 
+                        executeCVSCommand:cmd , fullName 
+                        module:moduleDir 
+                        "/ cg; cannot do it in current dir, in case it contains a CVS subDirectory,
+                        "/ with a different CVSRoot in its CVS/Root file ...
+                        "/ cvs would complain then.
+                        inDirectory:(tempDir pathName) 
+                        log:false
+                        outputTo:outputStream
+                        errorTo:errorStream.
+    
+            "cannot check for exit status starting at cvs 1.11.5, because an exit status 0
+             is returned even if the file does not exist"
+
+            "But: if there is any output, the command failed and the container does not exist"
+            "/ cg: read comment above.
+            ret2 := errorStream size == 0.
+            ret2 ifFalse:[
+                ret2 := (errorStream contents asCollectionOfLines 
+                            reject:[:l | l isBlank or:[(l includesString:'WARNING:')] ]) size == 0 
+            ].
+        ]
     ] ensure:[
         tempDir recursiveRemove.
     ].