use Packages::Config qw( $DBDIR @SUITES @ARCHIVES @SECTIONS
@ARCHITECTURES %FTP_SITES
@LANGUAGES @DDTP_LANGUAGES);
-use Packages::I18N::Locale;
use Packages::CGI qw( :DEFAULT make_url make_search_url );
use Packages::DB;
use Packages::Search qw( :all );
my $entry = $entries{$p_name} ||
read_entry_simple( $packages, $p_name, $opts->{h_archives}, $suite);
my $short_desc = $entry->[-1];
- my $desc_md5 = $entry->[-2];
+ my $desc_md5 = $entry->[-2] || '';
my $arch = $entry->[3];
my $archive = $entry->[1];
my $p_suite = $entry->[2];