[Koha-cvs] koha/circ returns.pl [rel_3_0]

paul poulain paul at koha-fr.org
Wed Dec 20 17:55:41 CET 2006


CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_3_0
Changes by:	paul poulain <tipaul>	06/12/20 16:55:41

Modified files:
	circ           : returns.pl 

Log message:
	the template result don't contain borrowernumber but librarian number.
	It generated perl warning

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/circ/returns.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.43.2.10&r2=1.43.2.11

Patches:
Index: returns.pl
===================================================================
RCS file: /sources/koha/koha/circ/returns.pl,v
retrieving revision 1.43.2.10
retrieving revision 1.43.2.11
diff -u -b -r1.43.2.10 -r1.43.2.11
--- returns.pl	14 Dec 2006 15:41:54 -0000	1.43.2.10
+++ returns.pl	20 Dec 2006 16:55:41 -0000	1.43.2.11
@@ -41,7 +41,7 @@
 my $query = new CGI;
 
 #getting the template
-my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
+my ( $template, $librarian, $cookie ) = get_template_and_user(
     {
         template_name   => "circ/returns.tmpl",
         query           => $query,
@@ -58,8 +58,8 @@
 my $branches = GetBranches();
 my $printers = GetPrinters( \%env );
 
-my $branch  = C4::Context->userenv->{'branch'};
-my $printer = C4::Context->userenv->{'branchprinter'};
+my $branch  = C4::Context->userenv?C4::Context->userenv->{'branch'}:"";
+my $printer = C4::Context->userenv?C4::Context->userenv->{'branchprinter'}:"";
 
 #
 # Some code to handle the error if there is no branch or printer setting.....





More information about the Koha-cvs mailing list