diff options
author | Jan Pazdziora <jpazdziora@redhat.com> | 2014-01-08 02:06:01 -0500 |
---|---|---|
committer | Jan Pazdziora <jpazdziora@redhat.com> | 2014-01-08 02:06:01 -0500 |
commit | 31ee05ba3d08fed28cc7014956428f7c52ca4201 (patch) | |
tree | b1896c8c123e4b39c79433cedea4871eb60e1bd4 /app.cgi | |
parent | 642e0c9a2dffe35d17bf8d5932a788adf9aaffbe (diff) | |
download | CGI-sessions-31ee05ba3d08fed28cc7014956428f7c52ca4201.tar.gz CGI-sessions-31ee05ba3d08fed28cc7014956428f7c52ca4201.tar.xz CGI-sessions-31ee05ba3d08fed28cc7014956428f7c52ca4201.zip |
Show the authenticated user already on the login page.
Diffstat (limited to 'app.cgi')
-rwxr-xr-x | app.cgi | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -73,7 +73,7 @@ sub login { if (defined $login and $error eq '') { print "Set-Cookie: $AUTH_COOKIE=ok:$login; path=$ENV{SCRIPT_NAME}\n"; print "Refresh: 3; URL=$ENV{SCRIPT_NAME}\n"; - $title = 'Logged in'; + $title = 'Logged in as ' . CGI::escapeHTML($login); $body = 'You will be redirected to the ' . qq!<a href="$ENV{SCRIPT_NAME}">home page</a>!; return; |