From 467986a820ac15d21019b070f6adefecb174de64 Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Fri, 21 Jun 1996 04:10:38 +0100 Subject: [PATCH] dpkg (1.2.7); priority=LOW * dpkg-scanpackages syntax errors fixed. -- Ian Jackson Fri, 21 Jun 1996 04:10:38 +0100 --- debian.Changelog | 6 ++++++ debian.rules | 2 +- scripts/dpkg-scanpackages.pl | 4 ++-- 3 files changed, 9 insertions(+), 3 deletions(-) diff --git a/debian.Changelog b/debian.Changelog index b3e4fa1e..0948d2c7 100644 --- a/debian.Changelog +++ b/debian.Changelog @@ -1,3 +1,9 @@ +dpkg (1.2.7); priority=LOW + + * dpkg-scanpackages syntax errors fixed. + + -- Ian Jackson Fri, 21 Jun 1996 04:10:38 +0100 + dpkg (1.2.6); priority=MEDIUM * NFS, CDROM and partition dselect methods include mountpoint diff --git a/debian.rules b/debian.rules index c0ba4cf3..8b3c431a 100755 --- a/debian.rules +++ b/debian.rules @@ -1,7 +1,7 @@ #!/usr/bin/make -f package=dpkg -version=1.2.6 +version=1.2.7 archi=$(shell dpkg --print-architecture) DIR:=$(shell pwd) diff --git a/scripts/dpkg-scanpackages.pl b/scripts/dpkg-scanpackages.pl index db068413..97396a94 100755 --- a/scripts/dpkg-scanpackages.pl +++ b/scripts/dpkg-scanpackages.pl @@ -73,7 +73,7 @@ while () { print(STDERR " ! Package $p (filename $fn) is repeat;\n". " ignored that one and using data from $pfilename{$p}) !\n") || die $!; - continue; + next; } if (defined($tv{'filename'})) { print(STDERR " ! Package $p (filename $fn) has Filename field !\n") || die $!; @@ -128,7 +128,7 @@ while() { if (length($maintainer)) { if ($maintainer =~ m/\s*=\>\s*/) { $oldmaint= $`; $newmaint= $'; $debmaint= $pv{$p,'maintainer'}; - if (!grep($debmaint eq $_, split(m,\s*//\s*, $oldmaint))) { + if (!grep($debmaint eq $_, split(m:\s*//\s*:, $oldmaint))) { push(@changedmaint, " $p (package says $pv{$p,'maintainer'}, not $oldmaint)\n"); } else { -- 2.39.5