koha-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Koha-cvs] CVS: koha/opac opac-reserve.pl,1.24,1.25


From: Joshua Ferraro
Subject: [Koha-cvs] CVS: koha/opac opac-reserve.pl,1.24,1.25
Date: Wed, 06 Jul 2005 14:32:05 -0700

Update of /cvsroot/koha/koha/opac
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23608

Modified Files:
        opac-reserve.pl 
Log Message:
synching with rel_2_2


Index: opac-reserve.pl
===================================================================
RCS file: /cvsroot/koha/koha/opac/opac-reserve.pl,v
retrieving revision 1.24
retrieving revision 1.25
diff -C2 -r1.24 -r1.25
*** opac-reserve.pl     4 May 2005 09:02:38 -0000       1.24
--- opac-reserve.pl     6 Jul 2005 21:32:02 -0000       1.25
***************
*** 58,61 ****
--- 58,65 ----
  
  my $branches = getbranches();
+ # make sure it's a real branch
+ if (!$branches->{$branch}) {
+ $branch='';
+ }
  $template->param(branchname => $branches->{$branch}->{'branchname'});
  
***************
*** 66,81 ****
  my %select_branches;
  
  foreach my $branch (keys %$branches) {
        if ($branch) {
!               push @select_branch, $branch;
!               $select_branches{$branch} = 
$branches->{$branch}->{'branchname'};
        }
  }
! my $CGIbranch=CGI::scrolling_list( -name     => 'branch',
!                       -values   => address@hidden,
!                       -labels   => \%select_branches,
!                       -size     => 1,
!                       -multiple => 0 );
! $template->param( CGIbranch => $CGIbranch);
  
  #### THIS IS A BIT OF A HACK BECAUSE THE BIBLIOITEMS DATA IS A LITTLE MESSED 
UP!
--- 70,87 ----
  my %select_branches;
  
+ my @CGIbranchlooparray;
+ 
  foreach my $branch (keys %$branches) {
        if ($branch) {
!               my %line;
!                 $line{branch} = $branches->{$branch}->{'branchname'};
!                 $line{value} = $branch;
!                 push @CGIbranchlooparray, \%line;
        }
  }
! @CGIbranchlooparray = sort {$a->{branch} cmp $b->{branch}} 
@CGIbranchlooparray;
! my $CGIbranchloop = address@hidden;
! $template->param( CGIbranch => $CGIbranchloop);
! 
  
  #### THIS IS A BIT OF A HACK BECAUSE THE BIBLIOITEMS DATA IS A LITTLE MESSED 
UP!




reply via email to

[Prev in Thread] Current Thread [Next in Thread]