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

Mason James szrj1m at yahoo.com
Fri May 11 06:03:39 CEST 2007


CVSROOT:	/sources/koha
Module name:	koha
Branch:		dev_week
Changes by:	Mason James <sushi>	07/05/11 04:03:39

Modified files:
	circ           : returns.pl 

Log message:
	typos..

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/circ/returns.pl?cvsroot=koha&only_with_tag=dev_week&r1=1.37.2.6.2.9&r2=1.37.2.6.2.10

Patches:
Index: returns.pl
===================================================================
RCS file: /sources/koha/koha/circ/returns.pl,v
retrieving revision 1.37.2.6.2.9
retrieving revision 1.37.2.6.2.10
diff -u -b -r1.37.2.6.2.9 -r1.37.2.6.2.10
--- returns.pl	11 May 2007 03:58:21 -0000	1.37.2.6.2.9
+++ returns.pl	11 May 2007 04:03:39 -0000	1.37.2.6.2.10
@@ -38,13 +38,13 @@
 use C4::Auth;
 use C4::Interface::CGI::Output;
 use C4::Koha;
-use C4::RotatingCollections;
 
 #wrapping PrintR.pm and C4::RotatingCollections call for CCFS in an 'if'
 # both files need to be commited to CVS :)
-my library_name = C4::Context->preference("LibraryName");
+my $library_name = C4::Context->preference("LibraryName");
+warn $library_name;
 
-if ( $library_name =~ /CCFLS/ ) {
+if ( $library_name =~ m/CCFLS/ ) {
     use PrintR; 
     use C4::RotatingCollections;
 }
@@ -169,7 +169,7 @@
 if ($barcode) {
 
     #CCFLS ONLY
-    if ( $library_name =~ /CCFLS/ ) {
+    if ( $library_name =~ m/CCFLS/ ) {
         system "php /usr/local/koha/intranet/htdocs/ccflsFines/createFine.php $barcode";
     }
 
@@ -510,7 +510,7 @@
 	IntranetNav => C4::Context->preference("IntranetNav"),
 );
 
-if ( $library_name =~ /CCFLS/ ) {
+if ( $library_name =~ m/CCFLS/ ) {
 ## Check to see if returned item is a rotating collection item returned to the wrong branch
     my $itemnumber = getItemnumberByBarcode( $query->param('barcode') );
     if ( $itemnumber ) {





More information about the Koha-cvs mailing list