koha-cvs
[Top][All Lists]
Advanced

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

[Koha-cvs] CVS: koha updatebibitem.pl,1.10,1.11


From: Andrew Arensburger
Subject: [Koha-cvs] CVS: koha updatebibitem.pl,1.10,1.11
Date: Sun, 13 Oct 2002 00:35:52 -0700

Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv4663

Modified Files:
        updatebibitem.pl 
Log Message:
Added magic RCS comment.
Removed trailing whitespace.


Index: updatebibitem.pl
===================================================================
RCS file: /cvsroot/koha/koha/updatebibitem.pl,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -r1.10 -r1.11
*** updatebibitem.pl    5 Oct 2002 09:47:08 -0000       1.10
--- updatebibitem.pl    13 Oct 2002 07:35:50 -0000      1.11
***************
*** 1,4 ****
--- 1,5 ----
  #!/usr/bin/perl
  
+ # $Id$
  
  # Copyright 2000-2002 Katipo Communications
***************
*** 70,74 ****
  
  my (@items) = &itemissues($bibitemnum);
! #print @items;           
  my $count   = @items;
  #print $count;
--- 71,75 ----
  
  my (@items) = &itemissues($bibitemnum);
! #print @items;
  my $count   = @items;
  #print $count;
***************
*** 137,141 ****
        }
        }
!       
     } elsif ($flag2 eq 'leastone') {
        &modbibitem({
--- 138,142 ----
        }
        }
! 
     } elsif ($flag2 eq 'leastone') {
        &modbibitem({
***************
*** 161,166 ****
          $loan=0;
        }
!       for (my $i=0;$i<$count;$i++){                                           
  
!         if ($barcodes[$i] ne ''){                                             
  
            moditem( {biblionumber => $bibnum,
                      loan         => $loan,
--- 162,167 ----
          $loan=0;
        }
!       for (my $i=0;$i<$count;$i++){
!         if ($barcodes[$i] ne ''){
            moditem( {biblionumber => $bibnum,
                      loan         => $loan,
***************
*** 168,174 ****
                      bibitemnum   => $bibitemnum
                      });
!         }                                                                     
  
        }
!       
     } else {
       &modbibitem({
--- 169,175 ----
                      bibitemnum   => $bibitemnum
                      });
!         }
        }
! 
     } else {
       &modbibitem({




reply via email to

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