[Koha-cvs] CVS: koha/opac opac-moredetail.pl,1.2,1.3

Andrew Arensburger arensb at users.sourceforge.net
Sun Oct 13 12:45:53 CEST 2002


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

Modified Files:
	opac-moredetail.pl 
Log Message:
Removed trailing whitespace.


Index: opac-moredetail.pl
===================================================================
RCS file: /cvsroot/koha/koha/opac/opac-moredetail.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** opac-moredetail.pl	3 Oct 2002 08:51:29 -0000	1.2
--- opac-moredetail.pl	13 Oct 2002 10:45:51 -0000	1.3
***************
*** 44,55 ****
  print center();
  
! my $dewey = $data->{'dewey'};                                                  
! $dewey =~ s/0+$//;                                                             
! if ($dewey eq "000.") { $dewey = "";};                                         
! if ($dewey < 10){$dewey='00'.$dewey;}                                          
! if ($dewey < 100 && $dewey > 10){$dewey='0'.$dewey;}                           
  if ($dewey <= 0){
!   $dewey='';                                                                   
! }               
  $dewey=~ s/\.$//;
  print <<printend
--- 44,55 ----
  print center();
  
! my $dewey = $data->{'dewey'};
! $dewey =~ s/0+$//;
! if ($dewey eq "000.") { $dewey = "";};
! if ($dewey < 10){$dewey='00'.$dewey;}
! if ($dewey < 100 && $dewey > 10){$dewey='0'.$dewey;}
  if ($dewey <= 0){
!   $dewey='';
! }
  $dewey=~ s/\.$//;
  print <<printend
***************
*** 74,79 ****
  <tr VALIGN=TOP  >
  <TD width=210 >
! <INPUT TYPE="image" name="submit"  VALUE="modify" height=42  WIDTH=93 BORDER=0 src="/images/modify-mem.gif"> 
! <INPUT TYPE="image" name="delete"  VALUE="delete" height=42  WIDTH=93 BORDER=0 src="/images/delete-mem.gif"> 
  <br>
  <FONT SIZE=2  face="arial, helvetica">
--- 74,79 ----
  <tr VALIGN=TOP  >
  <TD width=210 >
! <INPUT TYPE="image" name="submit"  VALUE="modify" height=42  WIDTH=93 BORDER=0 src="/images/modify-mem.gif">
! <INPUT TYPE="image" name="delete"  VALUE="delete" height=42  WIDTH=93 BORDER=0 src="/images/delete-mem.gif">
  <br>
  <FONT SIZE=2  face="arial, helvetica">
***************
*** 98,102 ****
  if ($type eq 'catmain'){
    print "<br><a href=/cgi-bin/koha/maint/shiftbib.pl?bi=$data->{'biblioitemnumber'}&bib=$data->{'biblionumber'}>Shift to another biblio</a>";
!  
  }
  print <<printend
--- 98,102 ----
  if ($type eq 'catmain'){
    print "<br><a href=/cgi-bin/koha/maint/shiftbib.pl?bi=$data->{'biblioitemnumber'}&bib=$data->{'biblionumber'}>Shift to another biblio</a>";
! 
  }
  print <<printend
***************
*** 113,117 ****
  print <<printend
  <img src="/images/holder.gif" width=16 height=300 align=left>
! <TABLE  CELLSPACING=0  CELLPADDING=5 border=1 align=left width=220 >				
  <TR VALIGN=TOP>
  <td  bgcolor="99cc33" background="/images/background-mem.gif"><B>BARCODE $items[$i]->{'barcode'}</b></TD>
--- 113,117 ----
  print <<printend
  <img src="/images/holder.gif" width=16 height=300 align=left>
! <TABLE  CELLSPACING=0  CELLPADDING=5 border=1 align=left width=220 >
  <TR VALIGN=TOP>
  <td  bgcolor="99cc33" background="/images/background-mem.gif"><B>BARCODE $items[$i]->{'barcode'}</b></TD>
***************
*** 123,128 ****
  <input type=hidden name=item value=$items[$i]->{'itemnumber'}>
  <input type=hidden name=type value=$type>
! <INPUT TYPE="image" name="submit"  VALUE="modify" height=42  WIDTH=93 BORDER=0 src="/images/modify-mem.gif"> 
! <INPUT TYPE="image" name="delete"  VALUE="delete" height=42  WIDTH=93 BORDER=0 src="/images/delete-mem.gif"> 
  <br>
  printend
--- 123,128 ----
  <input type=hidden name=item value=$items[$i]->{'itemnumber'}>
  <input type=hidden name=type value=$type>
! <INPUT TYPE="image" name="submit"  VALUE="modify" height=42  WIDTH=93 BORDER=0 src="/images/modify-mem.gif">
! <INPUT TYPE="image" name="delete"  VALUE="delete" height=42  WIDTH=93 BORDER=0 src="/images/delete-mem.gif">
  <br>
  printend





More information about the Koha-cvs mailing list