X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Floginout%2Flogin.html;h=1785ea796b9865c76c0ce82689d194a33e97164c;hb=HEAD;hp=a67ea4b58522db23b06dfdc209ac82c9b64cd708;hpb=e62544064299324ab04abae64cc33afef12a24aa;p=freeside.git diff --git a/httemplate/loginout/login.html b/httemplate/loginout/login.html index a67ea4b58..1785ea796 100644 --- a/httemplate/loginout/login.html +++ b/httemplate/loginout/login.html @@ -1,5 +1,5 @@ <& /elements/header-minimal.html, 'Login' &> - +
@@ -13,10 +13,12 @@ % } %#
+% my $uri = $r->prev->uri; +% $uri .= '?'. $r->prev->args if length( $r->prev->args ); - + - +
@@ -25,6 +27,10 @@ + + + +
Username: Password:
One-time code:

@@ -40,18 +46,17 @@ my %error = ( 'no_cookie' => '', #First login, don't display an error 'bad_cookie' => 'Bad Cookie', #timed out? - 'bad_credentials' => 'Incorrect username / password', + 'bad_credentials' => 'Incorrect username / password / one-time code', #'logout' => 'You have been logged out.', ); my $error = # $cgi->param('logout') || - $r->prev->subprocess_env("AuthCookieReason"); + $r->prev->subprocess_env('AuthCookieReason'); $error = exists($error{$error}) ? $error{$error} : $error; -#my $url_string = CGI->new->url; -my $url_string = $cgi->url; +my $url_string = $r->uri; #fake a freeside path for /login so we get our .css. shrug $url_string =~ s/login$/freeside\/login/ unless $url_string =~ /freeside\//;