[commit: ghc] master: sync-all: make --no-dph work for all subcommands (bdb5809)

git at git.haskell.org git at git.haskell.org
Thu Jun 26 02:54:37 UTC 2014


Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/bdb5809129a926eb56ed1c8bd25da5be20d0ee98/ghc

>---------------------------------------------------------------

commit bdb5809129a926eb56ed1c8bd25da5be20d0ee98
Author: Thomas Miedema <thomasmiedema at gmail.com>
Date:   Tue Jun 17 19:21:37 2014 +0200

    sync-all: make --no-dph work for all subcommands


>---------------------------------------------------------------

bdb5809129a926eb56ed1c8bd25da5be20d0ee98
 sync-all | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/sync-all b/sync-all
index d60e5c9..cebb86b 100755
--- a/sync-all
+++ b/sync-all
@@ -307,6 +307,10 @@ sub gitall {
 
     for $line (@packages) {
         $tag        = $$line{"tag"};
+        if ($tags{$tag} == 0) {
+            next;
+        }
+
         # Use the "remote" structure for bare git repositories
         $localpath  = ($bare_flag) ?
                       $$line{"remotepath"} : $$line{"localpath"};
@@ -340,10 +344,6 @@ sub gitall {
         if ($command eq "get") {
             next if $remotepath eq "-"; # "git submodule init/update" will get this later
 
-            if ($tags{$tag} == 0) {
-                next;
-            }
-
             if (-d $localpath) {
                 warning("$localpath already present; omitting")
                     if $localpath ne ".";



More information about the ghc-commits mailing list