#!/usr/bin/perl
# Copyright 2000-2003 Katipo Communications
+# parts copyright 2010 BibLibre
#
# This file is part of Koha.
#
use C4::Serials;
use C4::Dates qw/format_date/;
use C4::Circulation; # to use itemissues
+use C4::Members; # to use GetMember
use C4::Search; # enabled_staff_search_views
my $query=new CGI;
flagsrequired => {catalogue => 1},
});
+if($query->cookie("holdfor")){
+ my $holdfor_patron = GetMember('borrowernumber' => $query->cookie("holdfor"));
+ $template->param(
+ holdfor => $query->cookie("holdfor"),
+ holdfor_surname => $holdfor_patron->{'surname'},
+ holdfor_firstname => $holdfor_patron->{'firstname'},
+ holdfor_cardnumber => $holdfor_patron->{'cardnumber'},
+ );
+}
+
# get variables
my $biblionumber=$query->param('biblionumber');