diff options
author | Raphael Hertzog <hertzog@debian.org> | 2008-01-11 22:24:32 +0100 |
---|---|---|
committer | Raphael Hertzog <hertzog@debian.org> | 2008-01-11 22:24:32 +0100 |
commit | f8333ae45213125436db763e635df8d31e08cae8 (patch) | |
tree | 670499ff3d8f31e4a5192a79945f83c112e7dd81 /scripts/dpkg-gencontrol.pl | |
parent | cd8844d0cac5c2a0c070bf6df30f4d1675111fae (diff) | |
download | dpkg-f8333ae45213125436db763e635df8d31e08cae8.tar.gz |
dpkg-gencontrol: Also force version in ${binary:Version} if -v<version> is used.
Diffstat (limited to 'scripts/dpkg-gencontrol.pl')
-rwxr-xr-x | scripts/dpkg-gencontrol.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/scripts/dpkg-gencontrol.pl b/scripts/dpkg-gencontrol.pl index d927a8c0c..3321c537f 100755 --- a/scripts/dpkg-gencontrol.pl +++ b/scripts/dpkg-gencontrol.pl @@ -124,6 +124,7 @@ while (@ARGV) { my $changelog = parse_changelog($changelogfile, $changelogformat); $substvars->set_version_substvars($changelog->{"Version"}); $substvars->parse($varlistfile) if -e $varlistfile; +$substvars->set("binary:Version", $forceversion) if defined $forceversion; my $control = Dpkg::Control->new($controlfile); my $fields = Dpkg::Fields::Object->new(); |