From: <ssc...@us...> - 2003-03-16 00:52:36
|
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 $_; |