From eb1602022c670620f5d0caad9fcba03f88d2bc43 Mon Sep 17 00:00:00 2001
From: Shawn Boyette <sboyette@esilibrary.com>
Date: Tue, 11 Nov 2008 15:31:18 +0000
Subject: [PATCH] limits on next/prev line routines

---
 marc-cleanup |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/marc-cleanup b/marc-cleanup
index 0d222dc..96f3250 100755
--- a/marc-cleanup
+++ b/marc-cleanup
@@ -394,13 +394,13 @@ sub dump_record {
 }
 
 sub next_line {
-    $ptr++;
+    $ptr++ unless ($ptr == $#record);;
     print_linecontext();
     return 0;
 }
 
 sub prev_line {
-    $ptr--;
+    $ptr-- unless ($ptr == 0);
     print_linecontext();
     return 0;
 }
-- 
1.7.2.5