X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=bin%2Fparse-packages;h=61d6b841676fc644b2ca1dbbe0be31be1130cc9e;hb=58039945e72bbba9d7395e78df27f028479f00d3;hp=64c690de5dff0fc93cbbcd5df7be8d0b9513b5f7;hpb=11fd4b5f87f668eeb33922c6f64823e40828d137;p=deb%2Fpackages.git diff --git a/bin/parse-packages b/bin/parse-packages index 64c690d..61d6b84 100755 --- a/bin/parse-packages +++ b/bin/parse-packages @@ -2,9 +2,9 @@ # Convert Packages.gz files into Sleepycat db files for efficient usage of # data # -# $Id$ -# # Copyright (C) 2006 Jeroen van Wolffelaar +# Copyright (C) 2006-2007 Frank Lichtenheld +# # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or @@ -17,7 +17,7 @@ # You should have received a copy of the GNU General Public License # along with this program; if not, write to the Free Software -# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA +# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. use strict; use warnings; @@ -157,7 +157,7 @@ for my $suite (@SUITES) { $subsections{$suite}{$subsection}++; $priorities{$suite}{$data{priority}}++; my $pkgitem = "$archive $suite $data{'architecture'} ". - "$section $subsection $data{'priority'} $data{'version'} $sdescr\0"; + "$section $subsection $data{'priority'} $data{'version'} $data{'description-md5'} $sdescr\0"; my $previtem = ($packages_small{$data{'package'}}{$suite}{$data{'architecture'}} ||= $pkgitem); $packages_small{$data{'package'}}{$suite}{$data{'architecture'}} = $pkgitem @@ -303,7 +303,7 @@ for (my $i=1; $i<= $#descriptions; $i++) { } } if ($tags) { - foreach my $t (split /, /, $tags) { + foreach my $t (split m/, /, $tags) { if ($doc->add_term($t)) { warn "can't add term $t: $!\n"; }