X-Git-Url: https://git.deb.at/?a=blobdiff_plain;ds=sidebyside;f=lib%2FPackages%2FDispatcher.pm;h=d0343774eb2aafd64855399b05f3ec9a361cd4fb;hb=2b7709d2271f339165fb401ef02085d23af5db18;hp=67488e9794e65f3749468f206c7a270555f82f27;hpb=39c8d5a2fa0e09b0ee557c46a6f0bb34f327f18e;p=deb%2Fpackages.git diff --git a/lib/Packages/Dispatcher.pm b/lib/Packages/Dispatcher.pm index 67488e9..d034377 100755 --- a/lib/Packages/Dispatcher.pm +++ b/lib/Packages/Dispatcher.pm @@ -68,8 +68,11 @@ sub do_dispatch { stable => 'squeeze', testing => 'wheezy', unstable => 'sid', + 'rc-buggy' => 'experimental', '5.0' => 'lenny', - '6.0' => 'squeeze' ); + '6.0' => 'squeeze', + 'oldstable-backports' => 'lenny-backports', + 'stable-backports' => 'squeeze-backports' ); # Read in all the variables set by the form my $input; @@ -101,8 +104,9 @@ sub do_dispatch { $last_modified = $now if $now - $last_modified < 3600; if ($input->http('If-Modified-Since') and - (my $modtime = str2time($input->http('If-Modified-Since'), 'UTC'))) { - if ($modtime <= $last_modified) { + (my $client_timestamp = str2time($input->http('If-Modified-Since'), 'UTC'))) { + if ($client_timestamp >= $last_modified) { + # we are not modified since asked -> return "304 Not Modified" print $input->header(-status => 304); exit; }