X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=sync-all;h=f7caca5fc67d646f5060a9c54fc95c87f03483f9;hb=2d8b3172b1997bbd94130576134dac7b200cc963;hp=caaed50c846a1208beee964893d6cc94919823d6;hpb=72a2b6d88d34caf92eeefd86cc69cad86b77a79c;p=ghc-hetmet.git

diff --git a/sync-all b/sync-all
index caaed50..f7caca5 100755
--- a/sync-all
+++ b/sync-all
@@ -262,7 +262,6 @@ sub scmall {
     }
 
     push(@args, @_);
-    print "args: @args\n";
 
     for $line (@packages) {
 
@@ -297,6 +296,11 @@ sub scmall {
                 # Hack around 'darcs whatsnew' failing if there are no changes
                 $ignore_failure = 1;
             }
+            elsif ($command =~ /^commit$/) {
+                @scm_args = ("commit");
+                # git fails if there is nothing to commit, so ignore failures
+                $ignore_failure = 1;
+            }
             elsif ($command =~ /^(?:pus|push)$/) {
                 @scm_args = "push";
                 $want_remote_repo = 1;
@@ -354,6 +358,11 @@ sub scmall {
                     @scm_args = ("remote", "set-url", $branch_name, $path);
                 }
             }
+            elsif ($command =~ /^grep$/) {
+              @scm_args = ("grep");
+              # Hack around 'git grep' failing if there are no matches
+              $ignore_failure = 1;
+            }
             else {
                 die "Unknown command: $command";
             }
@@ -395,6 +404,7 @@ What do you want to do?
 Supported commands:
 
  * whatsnew
+ * commit
  * push
  * pull
  * get, with options:
@@ -407,6 +417,7 @@ Supported commands:
  * remote add <branch-name>
  * remote rm <branch-name>
  * remote set-url [--push] <branch-name>
+ * grep
 
 Available package-tags are:
 END