X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FPage.pm;h=92242f34500b732307a9a585d7fcc3d39d725e1e;hb=95dcb29e66d4a4876e5cbdee8dc0ff683b986c98;hp=27c3f3638e062a56d300a3311047c07994de7ca6;hpb=5ca559979f5074ae784d83a401b7dcb51e98317d;p=deb%2Fpackages.git diff --git a/lib/Packages/Page.pm b/lib/Packages/Page.pm index 27c3f36..92242f3 100644 --- a/lib/Packages/Page.pm +++ b/lib/Packages/Page.pm @@ -5,9 +5,9 @@ use warnings; use Data::Dumper; use Exporter; -use Locale::gettext; use Deb::Versions; use Packages::CGI; +use Packages::I18N::Locale; our @ISA = qw( Exporter ); our @EXPORT_OK = qw( split_name_mail parse_deps ); @@ -44,7 +44,7 @@ sub split_name_mail { $name = $string; $email = $string; } else { - $name = gettext( 'package has bad maintainer field' ); + $name = N_( 'package has bad maintainer field' ); $email = ''; } $name =~ s/\s+$//o; @@ -94,8 +94,8 @@ sub is_virtual { return (exists($self->{provided_by}) && !exists($self->{versions})); } -our @TAKE_NEWEST = qw( description essential priority section subsection tag - archive source source-version url ); +our @TAKE_NEWEST = qw( description description-md5 essential priority section subsection tag + archive source source-version url homepage ); our @STORE_ALL = qw( version source source-version installed-size size filename md5sum sha1 sha256 task origin bugs suite archive section );