french translation

[koha_gimpoz] / userpage.pl

diff --git a/userpage.pl b/userpage.pl
index 3e6b991..181be9c 100755 (executable)
--- a/userpage.pl
+++ b/userpage.pl
@@ -26,11 +26,16 @@ use CGI;
 use C4::Search;
 use C4::Auth;
 
-my $query=new CGI;
-my ($loggedinuser, $cookie, $sessionID) = checkauth($query, 1);
+my $query = new CGI;
+my ($template, $loggedinuser, $cookie)
+    = get_template_and_user({template_name => "user/userpage.tmpl",
+                            query => $query,
+                            type => "intranet",
+                            authnotrequired => 0,
+                            flagsrequired => {parameters => 1},
+                            debug => 1,
+                            });
 
-my $template = gettemplate("user/userpage.tmpl",0);
+warn "userloggedin : $loggedinuser (".$query->param('userid')." et ".$query->param('password');
 
-$template->param(loggedinuser => $loggedinuser);
-
-print $query->header(-cookie => $cookie), $template->output;
+output_html_with_http_headers $query, $cookie, $template->output;