X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=sync-all;h=7ccc71d221650a8c0fba70b9310a52c2cb223f63;hp=06c183af255fea7d8d86f4e4311add453bf90498;hb=877816b90b3c17582d32c7ed2ac56dd7042088e5;hpb=25fa4bdbff4a84d6717c4ff7cdf7080687616818

diff --git a/sync-all b/sync-all
index 06c183a..7ccc71d 100755
--- a/sync-all
+++ b/sync-all
@@ -389,6 +389,10 @@ sub scmall {
             scm ($localpath, $scm, "grep", @args)
                 unless $scm eq "darcs";
         }
+        elsif ($command =~ /^clean$/) {
+            scm ($localpath, $scm, "clean", @args)
+                unless $scm eq "darcs";
+        }
         elsif ($command =~ /^reset$/) {
             scm ($localpath, $scm, "reset", @args)
                 unless $scm eq "darcs";
@@ -426,6 +430,7 @@ Supported commands:
  * remote rm <branch-name>
  * remote set-url [--push] <branch-name>
  * grep
+ * clean
  * reset
  * config