summaryrefslogtreecommitdiff
path: root/Debian
diff options
context:
space:
mode:
authorjoey <joey>2000-09-21 02:47:05 +0000
committerjoey <joey>2000-09-21 02:47:05 +0000
commitd862e7704c86e7cdec8083932821d905a687d0b1 (patch)
tree488633b6727730fce99037f758c767cf03c70ef9 /Debian
parentc9e08fed467c2ff1a0ed92b49c54cfd6ca72cd02 (diff)
r371: * Modified to allow no spaces between control file field name and value
(this appears to be logal).
Diffstat (limited to 'Debian')
-rw-r--r--Debian/Debhelper/Dh_Lib.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/Debian/Debhelper/Dh_Lib.pm b/Debian/Debhelper/Dh_Lib.pm
index 42d4097..e71895e 100644
--- a/Debian/Debhelper/Dh_Lib.pm
+++ b/Debian/Debhelper/Dh_Lib.pm
@@ -271,7 +271,7 @@ sub pkgext { my $package=shift;
# Get the package version.
my $version=`dpkg-parsechangelog -l$isnative_changelog`;
- ($dh{VERSION})=$version=~m/Version: (.*)/m;
+ ($dh{VERSION})=$version=~m/Version:\s*(.*)/m;
# Did the changelog parse fail?
if (! defined $dh{VERSION}) {
@@ -371,10 +371,10 @@ sub GetPackages { my $type=shift;
while (<CONTROL>) {
chomp;
s/\s+$//;
- if (/^Package:\s+(.*)/) {
+ if (/^Package:\s*(.*)/) {
$package=$1;
}
- if (/^Architecture:\s+(.*)/) {
+ if (/^Architecture:\s*(.*)/) {
$arch=$1;
}
if (!$_ or eof) { # end of stanza.