X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FLibravatar.pm;h=81668a711e881427fe6bb1bada6951f633eb23a4;hb=c8f3903071c757e2273c9b91c659fcdc8bb035ff;hp=283db41af2e1b6bf794d067fd36eb126a8713dce;hpb=8b39f4838232a72cc22d8a9c4d3911277640e2cd;p=debbugs.git diff --git a/Debbugs/Libravatar.pm b/Debbugs/Libravatar.pm index 283db41..81668a7 100644 --- a/Debbugs/Libravatar.pm +++ b/Debbugs/Libravatar.pm @@ -244,7 +244,7 @@ sub handler { my $location = $r->location(); my ($email) = $uri =~ m/\Q$location\E\/?(.*)$/; if (not length $email) { - return Apache2::Const::NOT_FOUND; + return Apache2::Const::NOT_FOUND(); } my $q = CGI::Simple->new(); my %param = cgi_parameters(query => $q, @@ -285,7 +285,7 @@ sub serve_cache_mod_perl { } $r->filename($cache_location); $r->path_info(''); - $r->finfo(APR::Finfo::stat($cache_location, APR::Const::FINFO_NORM, $r->pool)); + $r->finfo(APR::Finfo::stat($cache_location, APR::Const::FINFO_NORM(), $r->pool)); } =back