--- a/SVN__CommitTask.st	Fri Feb 10 16:49:53 2012 +0100
+++ b/SVN__CommitTask.st	Fri Feb 10 16:50:03 2012 +0100
@@ -151,34 +151,39 @@
                 #() 
             ]
         ].
-        self 
-            synchronized:[
-                commitInfo := (CommitCommand new)
-                            workingCopy:self workingCopy;
-                            message: msg;
-                            paths:containers;
-                            execute.
-                 "Update the working copy. We need svn info
-                 to report commited revision"
-                (UpdateCommand new)
-                    workingCopy:self workingCopy;
-                    execute
-            ].
-        self doCompileSvnRevisionNrMethod:true.
-        self doCompileSvnRepositoryUrlStringMethod.        
-        ActivityNotification notify:'Shrinking changes'.
-        (ChangeSet current)
-            condenseChangesForPackage2:self package;
-            condenseChangesForExtensionsInPackage:self package;
-            flushChangedClassesCache;
-            yourself.
+        (paths notNil and:[paths isEmpty]) ifFalse:[
+            self 
+                synchronized:[
+                    commitInfo := (CommitCommand new)
+                                workingCopy:self workingCopy;
+                                message: msg;
+                                paths:containers;
+                                execute.
+                     "Update the working copy. We need svn info
+                     to report commited revision"
+                    (UpdateCommand new)
+                        workingCopy:self workingCopy;
+                        execute
+                ].
+            "Do this only iff this is a package commit"
+            package notNil ifTrue:[
+                self doCompileSvnRevisionNrMethod:true.
+                self doCompileSvnRepositoryUrlStringMethod.        
+                ActivityNotification notify:'Shrinking changes'.
+                (ChangeSet current)
+                    condenseChangesForPackage2:self package;
+                    condenseChangesForExtensionsInPackage:self package;
+                    flushChangedClassesCache;
+                    yourself.
+                ].
+        ]
     ].
     self workingCopy commited.
     ^ commitInfo
 
     "Created: / 11-04-2008 / 09:20:01 / Jan Vrany <vranyj1@fel.cvut.cz>"
     "Modified: / 19-08-2009 / 12:27:44 / Jan Vrany <vranyj1@fel.cvut.cz>"
-    "Modified: / 08-02-2012 / 18:52:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 10-02-2012 / 15:28:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 doPrepareWorkingCopy