require Exporter;
use C4::Context;
-use C4::Output;
use C4::Templates;
use C4::Koha;
use CGI::Session;
$session->param('emailaddress'),
$session->param('branchprinter')
);
- $cookie = $query->cookie( CGISESSID => $session->id );
+ $cookie = $query->cookie(
+ -name => 'CGISESSID',
+ -value => $session->id,
+ -HttpOnly => 1,
+ );
$loggedin = 1;
$userid = $session->param('cardnumber');
}
# printf L "%20s from %16s logged in at %30s.\n", $userid,
# $ENV{'REMOTE_ADDR'}, $time;
# close L;
- $cookie = $query->cookie( CGISESSID => $sessionID );
+ $cookie = $query->cookie(
+ -name => 'CGISESSID',
+ -value => $sessionID,
+ -HttpOnly => 1,
+ );
if ( $return == 2 ) {
#Only superlibrarian should have access to this page.
$cookie = $query->cookie(
-name => 'CGISESSID',
-value => '',
+ -HttpOnly => 1,
-expires => ''
);
}
$cookie = $query->cookie(
-name => 'CGISESSID',
-value => $sessionID,
+ -HttpOnly => 1,
-expires => ''
);
- print $query->header(
- -type => 'text/html; charset=utf-8',
- -cookie => $cookie
- ),
- $template->output;
+
+ require C4::Output;
+ C4::Output::output_html_with_http_headers($query,$cookie,$template->output);
exit;
}