[Koha-cvs] koha/opac opac-reserve.pl

Joshua Ferraro jmf at kados.org
Sun May 21 04:21:10 CEST 2006


CVSROOT:	/sources/koha
Module name:	koha
Branch: 	
Changes by:	Joshua Ferraro <kados at savannah.gnu.org>	06/05/21 02:21:10

Modified files:
	opac           : opac-reserve.pl 

Log message:
	syncing dev-week and HEAD

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/opac/opac-reserve.pl.diff?tr1=1.27&tr2=1.28&r1=text&r2=text

Patches:
Index: koha/opac/opac-reserve.pl
diff -u koha/opac/opac-reserve.pl:1.27 koha/opac/opac-reserve.pl:1.28
--- koha/opac/opac-reserve.pl:1.27	Thu Sep 22 10:01:46 2005
+++ koha/opac/opac-reserve.pl	Sun May 21 02:21:10 2006
@@ -74,16 +74,15 @@
 foreach my $branch (keys %$branches) {
 	if ($branch) {
 		my %line;
-                $line{branch} = $branches->{$branch}->{'branchname'};
-                $line{value} = $branch;
-                push @CGIbranchlooparray, \%line;
+		$line{branch} = $branches->{$branch}->{'branchname'};
+		$line{value} = $branch;
+		push @CGIbranchlooparray, \%line;
 	}
 }
 @CGIbranchlooparray = sort {$a->{branch} cmp $b->{branch}} @CGIbranchlooparray;
 my $CGIbranchloop = \@CGIbranchlooparray;
 $template->param( CGIbranch => $CGIbranchloop);
 
-
 #### THIS IS A BIT OF A HACK BECAUSE THE BIBLIOITEMS DATA IS A LITTLE MESSED UP!
 # get the itemtype data....
 my @items = ItemInfo(undef, $biblionumber, 'opac');
@@ -175,9 +174,6 @@
 $template->param(TYPE_ROWS => \@typerows);
 $width = 2*$width -1;
 $template->param(totalwidth => 2*$width-1,
-			     LibraryName => C4::Context->preference("LibraryName"),
-				suggestion => C4::Context->preference("suggestion"),
-				virtualshelves => C4::Context->preference("virtualshelves"),
 );
 
 if ($query->param('item_types_selected')) {
@@ -239,7 +235,7 @@
 } else {
 	# Here we check that the borrower can actually make reserves Stage 1.
 	my $noreserves = 0;
-	my $maxoutstanding = C4::Context->preference("maxoustanding");
+	my $maxoutstanding = C4::Context->preference("maxoutstanding");
 	$template->param(noreserve => 1) unless $maxoutstanding;
 	if ($borr->{'amountoutstanding'} > $maxoutstanding) {
 		my $amount = sprintf "\$%.02f", $borr->{'amountoutstanding'};





More information about the Koha-cvs mailing list