Author: richter
Date: Fri Jan 21 09:09:26 2011
New Revision: 1061698

URL: http://svn.apache.org/viewvc?rev=1061698&view=rev
Log:
Fix problem with error output on stderr for Windows 64Bit

Modified:
    perl/embperl/trunk/Changes.pod
    perl/embperl/trunk/epmain.c

Modified: perl/embperl/trunk/Changes.pod
URL: 
http://svn.apache.org/viewvc/perl/embperl/trunk/Changes.pod?rev=1061698&r1=1061697&r2=1061698&view=diff
==============================================================================
--- perl/embperl/trunk/Changes.pod (original)
+++ perl/embperl/trunk/Changes.pod Fri Jan 21 09:09:26 2011
@@ -1,5 +1,9 @@
 =pod
 
+=head 2.4.1
+    
+    - Fix problem with error output on stderr for Windows 64Bit
+
 =head 2.4.0  4. Oct 2010
 
     - Support for CGI.pm 3.43 (included within Perl 5.10.1)

Modified: perl/embperl/trunk/epmain.c
URL: 
http://svn.apache.org/viewvc/perl/embperl/trunk/epmain.c?rev=1061698&r1=1061697&r2=1061698&view=diff
==============================================================================
--- perl/embperl/trunk/epmain.c (original)
+++ perl/embperl/trunk/epmain.c Fri Jan 21 09:09:26 2011
@@ -259,14 +259,15 @@ static char * DoLogError (/*i/o*/ struct
     else
 #endif
         {
-        /*
+#ifdef WIN32
         PerlIO_printf (PerlIO_stderr(), "%s\n", sText) ;
         PerlIO_flush (PerlIO_stderr()) ;
-        */
+#else
 #undef fprintf
 #undef fflush
         fprintf (stderr, "%s\n", sText) ;
         fflush (stderr) ; 
+#endif
         }
     
     if (r)



---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]

Reply via email to