[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/opac opac-moredetail.pl,1.2,1.3
From: |
Andrew Arensburger |
Subject: |
[Koha-cvs] CVS: koha/opac opac-moredetail.pl,1.2,1.3 |
Date: |
Sun, 13 Oct 2002 03:45:53 -0700 |
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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/opac opac-moredetail.pl,1.2,1.3,
Andrew Arensburger <=