From d52a0bba4bbd32c6c597221d118bed893393bc9a Mon Sep 17 00:00:00 2001
From: Michal Vaner <vorner@ucw.cz>
Date: Fri, 22 Aug 2008 00:02:22 +0200
Subject: [PATCH] Empty URLs for headers did not work for login

Login can be generated without redirection from different actions, the
login form was pushed to them.
---
 PciIds/Html/Users.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/PciIds/Html/Users.pm b/PciIds/Html/Users.pm
index c5ed90e..eb0b6f1 100644
--- a/PciIds/Html/Users.pm
+++ b/PciIds/Html/Users.pm
@@ -182,7 +182,7 @@ sub genLoginForm( $$$$ ) {
 	my $addr = PciIds::Address::new( $req->uri() );
 	genCustomMenu( $addr, $args, [ [ 'Register', 'register' ], [ 'Reset password', 'respass' ] ] );
 	print '<div class="error"><p>'.$error.'</div>' if( defined $error );
-	print '<form name="login" id="login" method="POST" action=""><table>';
+	print '<form name="login" id="login" method="POST" action="'.setAddrPrefix( $req->uri(), 'mods' ).buildExcept( 'action', $args ).'?action=login"><table>';
 	genForm( [ [ 'Login name or email:', 'text', 'login', 'maxlength="255"' ],
 		[ 'Password:', 'password', 'password' ],
 		[ '', 'submit', 'login', 'value="Login"' ] ], $values );
-- 
2.39.2