Add 'sync-all status' as an alias for 'sync-all whatsnew' (to match git syntax)

[ghc-hetmet.git] / sync-all

diff --git a/sync-all b/sync-all
index 729dbd3..caaed50 100755 (executable)
--- a/sync-all
+++ b/sync-all
@@ -228,7 +228,7 @@ sub scmall {
 
     my ($repo_base, $checked_out_tree) = getrepo();
 
-    my $is_github_repo = $repo_base =~ m/(git@|git:\/\/)github.com/;
+    my $is_github_repo = $repo_base =~ m/(git@|git:\/\/|https:\/\/)github.com/;
 
     parsePackages;
 
@@ -290,7 +290,7 @@ sub scmall {
             }
 
             # Work out the arguments we should give to the SCM
-            if ($command =~ /^(?:w|wh|wha|what|whats|whatsn|whatsne|whatsnew)$/) {
+            if ($command =~ /^(?:w|wh|wha|what|whats|whatsn|whatsne|whatsnew|status)$/) {
                 @scm_args = (($scm eq "darcs" and "whatsnew")
                           or ($scm eq "git" and "status"));