backports_ftpsite=http://backports.org/debian
amd64_ftpsite=http://amd64.debian.net/debian
debports_ftpsite=http://ftp.debian-ports.org/debian
-ddtp_ftpsite=http://ddtp.debian.net/debian
+ddtp_ftpsite=
wget_cmd="wget --no-verbose --tries=2 --timeout=60"
check_release_cmd="perl -I${libdir} ${bindir}/check-release --verbose --ignoremissing --keyring ${configdir}/trusted.gpg"
&Packages::DB::init();
my $last_modified = $Packages::DB::db_read_time;
my $now = time;
+ my $expires = $last_modified + (12*3600);
+ $expires = $now + 3600 if $expires < $now;
# allow some fudge, since the db mod time is not the end of
# the cron job
- $last_modified = $now if $last_modified - $now < 3600;
+ $last_modified = $now if $now - $last_modified < 3600;
if ($input->http('If-Modified-Since') and
(my $modtime = str2time($input->http('If-Modified-Since'), 'UTC'))) {
-last_modified => strftime("%a, %d %b %Y %T %z",
localtime($last_modified)),
-expires => strftime("%a, %d %b %Y %T %z",
- localtime($last_modified + (12*3600))),
+ localtime($expires)),
);
#use Data::Dumper;
#print '<pre>'.Dumper(\%ENV, \%page_content, get_all_messages()).'</pre>';
arch_wording = ( architectures_enc == 'any' ? g("all architectures") : g("architecture(s) <em>%s</em>", architectures_enc) );
wording = g("paths that end with");
IF mode == 'filename';
- wording = g("files named");
- ELSIF mode == 'exactfilename';
wording = g("filenames that contain");
+ ELSIF mode == 'exactfilename';
+ wording = g("files named");
END %]
[%# @translators: I'm really sorry :/ %]
<p>[% g('You have searched for %s <em>%s</em> in suite <em>%s</em>, %s, and %s.',