koha-cvs
[Top][All Lists]
Advanced

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

[Koha-cvs] koha/members readingrec.pl


From: Chris Cormack
Subject: [Koha-cvs] koha/members readingrec.pl
Date: Wed, 07 Jun 2006 02:33:09 +0000

CVSROOT:        /sources/koha
Module name:    koha
Changes by:     Chris Cormack <rangi>   06/06/07 02:33:09

Modified files:
        members        : readingrec.pl 

Log message:
        Fix to allow any limit to be passed in

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/members/readingrec.pl?cvsroot=koha&r1=1.1&r2=1.2

Patches:
Index: readingrec.pl
===================================================================
RCS file: /sources/koha/koha/members/readingrec.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -b -r1.1 -r1.2
--- readingrec.pl       17 Jan 2006 16:50:05 -0000      1.1
+++ readingrec.pl       7 Jun 2006 02:33:09 -0000       1.2
@@ -1,9 +1,7 @@
 #!/usr/bin/perl
 
-#written 27/01/2000
-#script to display borrowers reading record
-
-
+# written 27/01/2000
+# script to display borrowers reading record
 
 # Copyright 2000-2002 Katipo Communications
 #
@@ -42,9 +40,13 @@
   $order2="date_due desc";
 }
 my $limit=$input->param('limit');
-if ($limit eq 'full' || $limit eq 0){
+
+if ($limit){
+    if ($limit eq 'full'){
   $limit=0;
-} else {
+    }
+} 
+else {
   $limit=50;
 }
 my ($count,$issues)=allissues($bornum,$order2,$limit);




reply via email to

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