--- a/SVN__CommitTask.st	Thu Feb 09 18:18:23 2012 +0100
+++ b/SVN__CommitTask.st	Thu Feb 09 18:18:31 2012 +0100
@@ -182,13 +182,17 @@
 !
 
 doPrepareWorkingCopy
-    self do:[
-        self workingCopy ensureIsValid.
-        self doFileOutAll
-    ]
+
+    self package notNil ifTrue:[
+        self do:[
+            self workingCopy ensureIsValid.
+            self doFileOutAll
+        ]
+    ].
 
     "Created: / 11-04-2008 / 09:19:27 / Jan Vrany <vranyj1@fel.cvut.cz>"
     "Modified: / 17-08-2009 / 18:28:34 / Jan Vrany <vranyj1@fel.cvut.cz>"
+    "Modified: / 09-02-2012 / 10:30:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !CommitTask class methodsFor:'documentation'!