--- a/CVSSourceCodeManager.st	Tue Oct 19 17:50:26 2004 +0200
+++ b/CVSSourceCodeManager.st	Tue Dec 14 15:59:50 2004 +0100
@@ -719,7 +719,7 @@
                 ^ nil.
             ].
         ].
-    ] valueOnUnwindDo:[
+    ] ifCurtailed:[
         tempdir recursiveRemove.
     ].
 
@@ -4465,7 +4465,7 @@
 !CVSSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.287 2004-10-19 15:50:26 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.288 2004-12-14 14:59:50 cg Exp $'
 ! !
 
 CVSSourceCodeManager initialize!