X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/6f736d92d4ace32d9fbf2e5351073008e114d4f4..108d13f833e9daeff4ea1552e2e1bee1e0ed8c22:/source.plp diff --git a/source.plp b/source.plp index 097f0ac..38af1fa 100644 --- a/source.plp +++ b/source.plp @@ -1,7 +1,6 @@ <(common.inc.plp)><: -my $source = $ENV{PATH_INFO}; -$source =~ s{^/}{}; +my $source = $Request; if ($source =~ s{(?<=\Q.inc.pl\E)/jsonp?$}{} and -r $source) { # convert perl include to json construct