From 7c09c12e6a9fc0576fc807952fbae5625a4b9d5d Mon Sep 17 00:00:00 2001
From: Colin Campbell <colin.campbell@ptfs-europe.com>
Date: Sun, 17 Apr 2011 23:25:25 -0400
Subject: [PATCH] Remove redundant variable

The 'first' element in the structure PrepareSerialsData
was only used in the opac template. Remove assignment
as it is now obsolete (and potentially confusing )

Signed-off-by: Nicole C. Engard <nengard@bywatersolutions.com>
Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
---
 C4/Serials.pm | 1 -
 1 file changed, 1 deletion(-)

diff --git a/C4/Serials.pm b/C4/Serials.pm
index 32c9bcbce5..1f8c170445 100644
--- a/C4/Serials.pm
+++ b/C4/Serials.pm
@@ -441,7 +441,6 @@ sub PrepareSerialsData {
     foreach my $key ( sort { $b cmp $a } keys %tmpresults ) {
         push @res, $tmpresults{$key};
     }
-    $res[0]->{'first'} = 1;
     return \@res;
 }
 
-- 
2.39.5