[6344] call binmode on the right file handle

[Gavin D. Smith]

Revision: 6344
          http://svn.sv.gnu.org/viewvc/?view=rev&root=texinfo&revision=6344
Author:   gavin
Date:     2015-06-18 19:45:35 +0000 (Thu, 18 Jun 2015)
Log Message:
-----------
call binmode on the right file handle

Modified Paths:
--------------
    trunk/ChangeLog
    trunk/tp/Texinfo/Common.pm

Modified: trunk/ChangeLog
===================================================================
--- trunk/ChangeLog     2015-06-18 16:58:35 UTC (rev 6343)
+++ trunk/ChangeLog     2015-06-18 19:45:35 UTC (rev 6344)
@@ -1,3 +1,8 @@
+2015-06-18  Eli Zaretskii  <address@hidden>
+
+       * tp/Texinfo/Common.pm (open_out): Call binmode on opened file 
+       handle as intended.
+
 2015-06-18  Karl Berry  <address@hidden>
 
        * pretest 5.9.94.

Modified: trunk/tp/Texinfo/Common.pm
===================================================================
--- trunk/tp/Texinfo/Common.pm  2015-06-18 16:58:35 UTC (rev 6343)
+++ trunk/tp/Texinfo/Common.pm  2015-06-18 19:45:35 UTC (rev 6344)
@@ -1067,7 +1067,7 @@
   # We run binmode to turn off outputting LF as CR LF under MS-Windows,
   # so that Info tag tables will have correct offsets.  This must be done
   # before setting the encoding filters with binmode.
-  binmode(STDOUT) if $use_binmode;
+  binmode($filehandle) if $use_binmode;
   if ($encoding) {
     if ($encoding eq 'utf8' or $encoding eq 'utf-8-strict') {
       binmode($filehandle, ':utf8');