[Koha-devel] CVS: koha modbibitem.pl,1.2,1.3
Steve Tonnesen
tonnesen at users.sourceforge.net
Wed Oct 10 12:27:10 CEST 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>
More information about the Koha-devel
mailing list