Update of /cvsroot/popfile/engine/UI
In directory sc8-pr-cvs1:/tmp/cvs-serv6457
Modified Files:
HTML.pm
Log Message:
add binmode to output file when writing archive
Index: HTML.pm
===================================================================
RCS file: /cvsroot/popfile/engine/UI/HTML.pm,v
retrieving revision 1.113
retrieving revision 1.114
diff -C2 -d -r1.113 -r1.114
*** HTML.pm 12 Mar 2003 21:28:21 -0000 1.113
--- HTML.pm 16 Mar 2003 00:52:33 -0000 1.114
***************
*** 3356,3359 ****
--- 3356,3360 ----
if ( open( TO, ">$to_dir\/$to_name") ) {
binmode FROM;
+ binmode TO;
while (<FROM>) {
print TO $_;
|
