Fix code that removes Packages entries - need to be paragraph-oriented rather than line-oriented here

This commit is contained in:
Steve McIntyre 2008-04-20 15:31:48 +00:00
parent d45a3b61f5
commit 7c095e5768

View File

@ -830,6 +830,7 @@ sub remove_Packages_entry {
$gz = gzopen("$pkgfile.gz", "wb9");
$/ = ''; # Browse by paragraph
while (defined($match = <IFILE>)) {
if (! ($match =~ /^Package: \Q$p\E$/m)) {
print OFILE $match;