bugfixes :

uses C4::Auth; added to request.pl
one </TMPL_IF> needed in request.tmpl

diff --git a/koha-tmpl/intranet-tmpl/default/en/request.tmpl b/koha-tmpl/intranet-tmpl/default/en/request.tmpl
index 89ea6d9..2370572 100644 (file)
--- a/koha-tmpl/intranet-tmpl/default/en/request.tmpl
+++ b/koha-tmpl/intranet-tmpl/default/en/request.tmpl
@@ -70,7 +70,7 @@
                        <TMPL_ELSE>
                                <input type=checkbox name=reqbib value=<TMPL_VAR Name="biblioitemnumber">>
                                <input type=hidden name=biblioitem value=<TMPL_VAR Name="biblioitemnumber">>
-                       <TMPL_IF>
+                       </TMPL_IF>
                </td>
                <TD>
                        <TMPL_VAR Name="description">
@@ -182,4 +182,4 @@
 <br>
 </form>
 
-<TMPL_INCLUDE Name="cat-bottom.inc">
\ No newline at end of file
+<TMPL_INCLUDE Name="cat-bottom.inc">

diff --git a/request.pl b/request.pl
index 2a7937e..379418a 100755 (executable)
--- a/request.pl
+++ b/request.pl
@@ -27,6 +27,7 @@ use strict;
 #use DBI;
 use C4::Search;
 use C4::Output;
+use C4::Auth;
 use C4::Reserves2;
 use C4::Biblio;
 use C4::Koha;
@@ -66,7 +67,6 @@ for (my $i=1; $i<=$num; $i++){
 my $branch = $input->cookie('branch');
 ($branch) || ($branch = 'L');
 my $branches = getbranches();
-my $branchoptions = branchoptions($branch);
 # make branch selection options...
 my @branchloop;
 foreach my $br (keys %$branches) {
@@ -153,7 +153,7 @@ foreach my $res (sort {$a->{'found'} cmp $b->{'found'}} @$reserves){
                $reserve{'barcode'}=$item->{'barcode'};
                $reserve{'biblionumber'}=$item->{'biblionumber'};
                $reserve{'wbrcode'} = $res->{'branchcode'};
-               $reserve{'wbrname'} = $branches->{$wbrcd}->{'branchname'};
+               $reserve{'wbrname'} = $branches->{$res->{'branchcode'}}->{'branchname'};
     }
     $reserve{'date'} = slashifyDate($res->{'reservedate'});
        $reserve{'borrowernumber'}=$res->{'borrowernumber'};