summaryrefslogtreecommitdiffstats
path: root/app.cgi
diff options
context:
space:
mode:
Diffstat (limited to 'app.cgi')
-rwxr-xr-xapp.cgi8
1 files changed, 8 insertions, 0 deletions
diff --git a/app.cgi b/app.cgi
index badc13a..31a9f4a 100755
--- a/app.cgi
+++ b/app.cgi
@@ -22,6 +22,14 @@ my $LOGIN = '/login';
my $LOGOUT = '/logout';
my $AUTH_COOKIE = 'the-test-cookie';
+if (defined $ENV{FRONTEND_SCRIPT_NAME}) {
+ $ENV{SCRIPT_NAME} = $ENV{FRONTEND_SCRIPT_NAME};
+
+ for my $x (map { /^HTTP_(REMOTE_USER.*)/ ? ($1) : () } keys %ENV) {
+ $ENV{$x} = $ENV{"HTTP_$x"};
+ }
+}
+
my $q = new CGI;
my $cookie = $q->cookie($AUTH_COOKIE);
my ($user, $name);