-----BEGIN PGP SIGNED MESSAGE----- Hash: SHA512 tags 695274 +patch thanks
I worked up a patch to hopefully fix this issue. Now each multiline entry is added to it's respective key by appending a line break and the following multiline entries. I need this package as I run some tools which parse Source and Package-files from the mirrors. Please take a look. Regards, Simon - -- -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.12 (GNU/Linux) Comment: Using GnuPG with Thunderbird - http://www.enigmail.net/ iQIcBAEBCgAGBQJTAxjQAAoJEBy08PeN7K/pr+oP/0njigGwMsfbfeK/m1A7nWGg EMcNyjvphq+36rLnLDj5aToIneqjEQlA2fcEY0wVV9ubEkXaN/aK0dbVLjWYd8Yf Is9FAmrc9Hkwd2iwrcHfHB1db48W5H4u4A6nh3NigvOSaWSTyBAh6/ixFjci8bSH hkE92GVT6SPPZ1ALLyMn2vBaUG9eh5CCvOeftzykd52b9Y5lXGZfJg7bfYpQYeTR k9GWZ3fd2PN989NoS9zAFckwrxfczWgifxZ7rlh4MGznV4UFyJXJG7frWas/7F2c lrNswAzoZ8QfbQDtNNkKGpbBFIKatLlB/HBX0kD7OGNfx7A552PXfbykf7ZFQUGh 31xhoDfVjPetgsyJ23t/EFX5S5uBm8Xw7aMaAawXQNrKfdBgsx2GL9vnXGTVNXNN uf+at8fuTG9wFm7XHwpgpohtY9QbQ0H4gfwDe6BTHhZ/b8Cei0U6iz3CuDYl4z1w juYDwrtK283agvVEMyvbkhtLslAPnGOitBj4RBxA9hf6bsJcYqqnDp8wnDn0eZca aruQUU4LgbB/ZOZs9yDyc8/C+E/IwHh4SJGHMuWuIqgX/KaDMIEJmvy+eCBIN87v I+iYwv4LW89oJObvpwq3EPdBCts6Hdr9T2VvIEFT0xrZLbzL7aS0ynQNmAkWt0Jh lWGP0L09RBYNI1HaAIun =QNya -----END PGP SIGNATURE-----
--- /usr/share/perl5/Parse/Debian/Packages.pm 2012-03-11 20:28:59.000000000 +0100
+++ PackagesNG.pm 2014-02-18 08:39:21.176892873 +0100
@@ -1,5 +1,5 @@
use strict;
-package Parse::Debian::Packages;
+package Parse::Debian::PackagesNG;
our $VERSION = '0.03';
sub new {
@@ -12,17 +12,20 @@
sub next {
my $self = shift;
my $fh = $self->{fh};
-
+ my $lastkey;
my %parsed;
while (<$fh>) {
last if /^$/;
if (my ($key, $value) = m/^(\S+): (.*)/) {
$parsed{$key} = $value;
- }
+ $lastkey=$key;
+ }
else {
+ print "E: $lastkey: $_";
s/ //;
s/^\.$//;
- $parsed{body} .= $_;
+ chomp;
+ $parsed{$lastkey}.= "\n".$_;
}
}
fix_multiple_stanzas.diff.sig
Description: PGP signature
