summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
d3e3f2f)
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
runcmd qw(git checkout -q), "refs/tags/$tagval";
runcmd qw(git checkout -q), "refs/tags/$tagval";
+ my $clogp = parsechangelog();
+ my $clogf = sub {
+ my ($f, $exp) = @_;
+ my $got = getfield $clogp, $f;
+ return if $got eq $exp;
+ reject "mismatch: changelog $f $got != $exp";
+ };
+ $clogf->('Version', $version);
+ $clogf->('Source', $package);
+
@fetch = (@dgit, qw(fetch), $suite);
debugcmd "+",@_;
$!=0; $?=-1;
@fetch = (@dgit, qw(fetch), $suite);
debugcmd "+",@_;
$!=0; $?=-1;