[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-devel] CVS: koha modbibitem.pl,1.2,1.3
From: |
Steve Tonnesen |
Subject: |
[Koha-devel] CVS: koha modbibitem.pl,1.2,1.3 |
Date: |
Wed Oct 10 12:27:10 2001 |
Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv25494
Modified Files:
modbibitem.pl
Log Message:
used CGI.pm's textfield function to create the notes text input box. Notes
with question marks '"' in them were getting deleted when an item was
modified.
Index: modbibitem.pl
===================================================================
RCS file: /cvsroot/koha/koha/modbibitem.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** modbibitem.pl 2001/09/10 23:37:09 1.2
--- modbibitem.pl 2001/10/10 19:26:14 1.3
***************
*** 86,89 ****
--- 86,91 ----
}
print "</select></td></tr>";
+ my $notesinput=$input->textfield(-name=>'Notes', -default=>$data->{'bnotes'},
-size=>20);
+
print <<printend
<TR VALIGN=TOP bgcolor="99cc33">
***************
*** 113,117 ****
<td><input type=text name=Volume value="$data->{'volumeddesc'}"
size=20></td></tr>
<tr valign=top bgcolor=white><td>Notes</td>
! <td><input type=text name=Notes value="$data->{'bnotes'}" size=20></td></tr>
<tr valign=top bgcolor=white><td>Size</td>
<td><input type=text name=Size value="$data->{'size'}" size=20></td></tr>
--- 115,119 ----
<td><input type=text name=Volume value="$data->{'volumeddesc'}"
size=20></td></tr>
<tr valign=top bgcolor=white><td>Notes</td>
! <td>$notesinput</td></tr>
<tr valign=top bgcolor=white><td>Size</td>
<td><input type=text name=Size value="$data->{'size'}" size=20></td></tr>
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-devel] CVS: koha modbibitem.pl,1.2,1.3,
Steve Tonnesen <=