[Koha-patches] [PATCH] fix references to $session in circ/circulation.pl
Galen Charlton
galen.charlton at liblime.com
Mon May 11 23:20:24 CEST 2009
Now that sticky due date processing uses the session,
script will always need it.
---
circ/circulation.pl | 9 +++------
1 files changed, 3 insertions(+), 6 deletions(-)
diff --git a/circ/circulation.pl b/circ/circulation.pl
index 41ad694..49dc338 100755
--- a/circ/circulation.pl
+++ b/circ/circulation.pl
@@ -49,14 +49,15 @@ use Date::Calc qw(
#
my $query = new CGI;
+my $sessionID = $query->cookie("CGISESSID") ;
+my $session = get_session($sessionID);
+
# new op dev the branch and the printer are now defined by the userenv
# but first we have to check if someone has tried to change them
my $branch = $query->param('branch');
if ($branch){
# update our session so the userenv is updated
- my $sessionID = $query->cookie("CGISESSID") ;
- my $session = get_session($sessionID);
$session->param('branch',$branch);
my $branchname = GetBranchName($branch);
$session->param('branchname',$branchname);
@@ -65,14 +66,10 @@ if ($branch){
my $printer = $query->param('printer');
if ($printer){
# update our session so the userenv is updated
- my $sessionID = $query->cookie("CGISESSID") ;
- my $session = get_session($sessionID);
$session->param('branchprinter',$printer);
}
if (!C4::Context->userenv && !$branch){
- my $sessionID = $query->cookie("CGISESSID") ;
- my $session = get_session($sessionID);
if ($session->param('branch') eq 'NO_LIBRARY_SET'){
# no branch set we can't issue
print $query->redirect("/cgi-bin/koha/circ/selectbranchprinter.pl");
--
1.5.6.5
More information about the Koha-patches
mailing list