our (@dput) = qw(dput);
our (@debsign) = qw(debsign);
our (@gpg) = qw(gpg);
-fixme should be in manual
-fixme should pass this to debsign
our (@sbuild) = qw(sbuild -A);
our (@dpkgbuildpackage) = qw(dpkg-buildpackage -i\.git/ -I.git);
our (@dpkgsource) = qw(dpkg-source -i\.git/ -I.git);
push @sign_cmd, $tfn->('.tmp');
runcmd_ordryrun @sign_cmd;
if (!$dryrun) {
- $tagobjfn = $tfn->('.signed.tmp')
+ $tagobjfn = $tfn->('.signed.tmp');
runcmd shell_cmd "> $tagobjfn", qw(cat --),
$tfn->('.tmp'), $tfn->('.tmp.asc');
}
}
if ($sign) {
- if (!$as_remote) {
- my @tag_cmd = (@git, qw(tag -a -m),
- );
- push @tag_cmd, $tag;
- runcmd_ordryrun @tag_cmd;
- } else {
- }
-
- push @tag_cmd, qw(-u),$keyid if defined $keyid;
-
my @debsign_cmd = @debsign;
push @debsign_cmd, "-k$keyid" if defined $keyid;
push @debsign_cmd, $changesfile;