git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
common: prepare path request in global variable
[sheet.git]
/
source.plp
diff --git
a/source.plp
b/source.plp
index 097f0ac3f310b103b97cdd68a00fd0dfa5cef2b2..38af1faa1bcd21245b287831c060c22252136b71 100644
(file)
--- a/
source.plp
+++ b/
source.plp
@@
-1,7
+1,6
@@
<(common.inc.plp)><:
<(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
if ($source =~ s{(?<=\Q.inc.pl\E)/jsonp?$}{} and -r $source) {
# convert perl include to json construct