summaryrefslogtreecommitdiff
path: root/scripts/dpkg-gencontrol.pl
diff options
context:
space:
mode:
authorRaphael Hertzog <hertzog@debian.org>2008-01-11 22:24:32 +0100
committerRaphael Hertzog <hertzog@debian.org>2008-01-11 22:24:32 +0100
commitf8333ae45213125436db763e635df8d31e08cae8 (patch)
tree670499ff3d8f31e4a5192a79945f83c112e7dd81 /scripts/dpkg-gencontrol.pl
parentcd8844d0cac5c2a0c070bf6df30f4d1675111fae (diff)
downloaddpkg-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-xscripts/dpkg-gencontrol.pl1
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();