Adding cookie-based authentication calls
This commit is contained in:
parent
e1c477eb43
commit
32975d39be
|
|
@ -26,6 +26,7 @@ use CGI;
|
|||
use C4::Circulation::Circ2;
|
||||
use C4::Output;
|
||||
use C4::Reserves2;
|
||||
use C4::Auth;
|
||||
|
||||
###############################################
|
||||
# constants
|
||||
|
|
@ -46,6 +47,7 @@ my $printers = getprinters(\%env);
|
|||
# Getting state
|
||||
|
||||
my $query=new CGI;
|
||||
my ($loggedinuser, $sessioncookie, $sessionID) = checkauth($query);
|
||||
|
||||
|
||||
my $branch = $query->param("branch");
|
||||
|
|
@ -293,7 +295,7 @@ EOF
|
|||
#######################################################################################
|
||||
# Make the page .....
|
||||
|
||||
print $query->header;
|
||||
print $query->header(-cookie=>$sessioncookie);
|
||||
print startpage;
|
||||
#print startmenu('circulation');
|
||||
my @inp=startmenu('circulation');
|
||||
|
|
|
|||
|
|
@ -480,9 +480,9 @@ EOF
|
|||
|
||||
|
||||
if ($branchcookie && $printercookie) {
|
||||
print $query->header(-type=>'text/html',-expires=>'now', -cookie=>[$branchcookie,$printercookie]);
|
||||
print $query->header(-type=>'text/html',-expires=>'now', -cookie=>[$branchcookie,$printercookie,$sessioncookie]);
|
||||
} else {
|
||||
print $query->header();
|
||||
print $query->header(-cookie=>[$sessioncookie]);
|
||||
}
|
||||
|
||||
print startpage();
|
||||
|
|
|
|||
|
|
@ -28,6 +28,7 @@ use C4::Search;
|
|||
use C4::Output;
|
||||
use C4::Print;
|
||||
use C4::Reserves2;
|
||||
use C4::Auth;
|
||||
|
||||
my %env;
|
||||
my $headerbackgroundcolor='#99cc33';
|
||||
|
|
@ -38,6 +39,7 @@ my $linecolor2='white';
|
|||
my $backgroundimage="/images/background-mem.gif";
|
||||
|
||||
my $query=new CGI;
|
||||
my ($loggedinuser, $sessioncookie, $sessionID) = checkauth($query);
|
||||
my $branches = getbranches();
|
||||
my $printers = getprinters(\%env);
|
||||
|
||||
|
|
@ -432,7 +434,7 @@ $returneditemstable .= "</table>\n";
|
|||
|
||||
|
||||
# actually print the page!
|
||||
print $query->header();
|
||||
print $query->header(-cookie => $sessioncookie);
|
||||
print startpage();
|
||||
print startmenu('circulation');
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue