wip changes for remote push - fixes, todos

[dgit.git] / dgit

diff --git a/dgit b/dgit
index 3a91929f7cbffb027e891fe8b86ec1a5327682a9..e8b6c3004a7cd299b8647faec2fbb02e2831ac46 100755 (executable)
--- a/dgit
+++ b/dgit
@@ -998,11 +998,11 @@ END
        runcmd_ordryrun @sign_cmd;
        if (!$dryrun) {
            $tagobjfn = $tfn->('.signed.tmp');
-           runcmd shell_cmd "> $tagobjfn", qw(cat --),
+           runcmd shell_cmd "exec >$tagobjfn", qw(cat --),
                $tfn->('.tmp'), $tfn->('.tmp.asc');
        }
     }
-    my $tag_obj_hash = runcmd @git, qw(hash-object -w -t tag), $tagobjfn;
+    my $tag_obj_hash = cmdoutput @git, qw(hash-object -w -t tag), $tagobjfn;
     runcmd_ordryrun @git, qw(verify-tag), $tag_obj_hash;
     runcmd_ordryrun @git, qw(update-ref), "refs/tags/$tag", $tag_obj_hash;
     runcmd_ordryrun @git, qw(tag -v --), $tag;