koha-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

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


From: Mason James
Subject: [Koha-cvs] koha/circ returns.pl [dev_week]
Date: Fri, 11 May 2007 04:59:15 +0000

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

Modified files:
        circ           : returns.pl 

Log message:
        Chris has a better way to stop perl failing when trying to load 
packages  :)

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.10&r2=1.37.2.6.2.11

Patches:
Index: returns.pl
===================================================================
RCS file: /sources/koha/koha/circ/returns.pl,v
retrieving revision 1.37.2.6.2.10
retrieving revision 1.37.2.6.2.11
diff -u -b -r1.37.2.6.2.10 -r1.37.2.6.2.11
--- returns.pl  11 May 2007 04:03:39 -0000      1.37.2.6.2.10
+++ returns.pl  11 May 2007 04:59:15 -0000      1.37.2.6.2.11
@@ -39,17 +39,19 @@
 use C4::Interface::CGI::Output;
 use C4::Koha;
 
+
 #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");
-warn $library_name;
 
 if ( $library_name =~ m/CCFLS/ ) {
-    use PrintR; 
-    use C4::RotatingCollections;
+    eval "use Printr";
+    eval "use C4::RotatingCollections";
 }
 
 
+
 my $query = new CGI;
 
 #getting the template




reply via email to

[Prev in Thread] Current Thread [Next in Thread]