diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2013-08-24 18:01:30 +0100 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2013-08-24 18:01:30 +0100 |
commit | 66f4ccc0e2c6667ce720cdd74806b0397f104154 (patch) | |
tree | 46cdb42b73ddd908ab03101676c674d5b0fe8485 | |
parent | a5ea919cd9bc80267bb1071b41a90e981ada6032 (diff) |
In push, double-check the .changes against the changelog.
-rw-r--r-- | debian/changelog | 1 | ||||
-rwxr-xr-x | dgit | 5 |
2 files changed, 6 insertions, 0 deletions
diff --git a/debian/changelog b/debian/changelog index a0b54f9..aa06a7f 100644 --- a/debian/changelog +++ b/debian/changelog @@ -2,6 +2,7 @@ dgit (0.9) unstable; urgency=low * New cleaning arrangements. * More comprehensive workaround for `3.0 (quilt)'. + * In push, double-check the .changes against the changelog. -- @@ -849,6 +849,11 @@ sub dopush () { ($changesfile) = @cs; } } + my $changes = parsecontrol($changesfile,$changesfile); + foreach my $field (qw(Source Distribution Version)) { + $changes->{$field} eq $clogp->{$field} or + fail "changes field $field \`$changes->{$field}'" + " does not match changelog \`$clogp->{$field}'"; my $tag = debiantag($dversion); if (!check_for_git()) { create_remote_git_repo(); |