From e07e5898794e3147654c8a5c3e5e660c380e892f Mon Sep 17 00:00:00 2001
From: rangi <rangi>
Date: Wed, 7 Jun 2006 02:33:09 +0000
Subject: [PATCH] Fix to allow any limit to be passed in

---
 members/readingrec.pl | 16 +++++++++-------
 1 file changed, 9 insertions(+), 7 deletions(-)

diff --git a/members/readingrec.pl b/members/readingrec.pl
index f7925b5e31..3df24b84c9 100755
--- a/members/readingrec.pl
+++ b/members/readingrec.pl
@@ -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 @@ if ($order2 eq ''){
   $order2="date_due desc";
 }
 my $limit=$input->param('limit');
-if ($limit eq 'full' || $limit eq 0){
-  $limit=0;
-} else {
+
+if ($limit){
+    if ($limit eq 'full'){
+	$limit=0;
+    }
+} 
+else {
   $limit=50;
 }
 my ($count,$issues)=allissues($bornum,$order2,$limit);
-- 
2.39.5