diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2016-10-30 22:04:27 +0000 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2016-10-30 22:46:35 +0000 |
commit | 4111b99a0edc2040ada8e9f2998f7c68ba397a97 (patch) | |
tree | 7e37b27e25398d43472ace46142dc296bee2e5bb /dgit | |
parent | d9d6f6bd791bded81431beb335ff789ae3a74e16 (diff) |
-p option: Check against changelog
If -p is specified during push, we check that it's right.
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
Diffstat (limited to 'dgit')
-rwxr-xr-x | dgit | 5 |
1 files changed, 4 insertions, 1 deletions
@@ -3200,7 +3200,10 @@ sub push_parse_changelog ($) { my $clogp = Dpkg::Control::Hash->new(); $clogp->load($clogpfn) or die; - $package = getfield $clogp, 'Source'; + my $clogpackage = getfield $clogp, 'Source'; + $package //= $clogpackage; + fail "-p specified $package but changelog specified $clogpackage" + unless $package eq $clogpackage; my $cversion = getfield $clogp, 'Version'; my $tag = debiantag($cversion, access_basedistro); runcmd @git, qw(check-ref-format), $tag; |