This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Note the one mistake in perl.git's history, and the appropriate graft to remove it
[perl5.git] / perlio.c
index 4fe4fa7..50966e6 100644 (file)
--- a/perlio.c
+++ b/perlio.c
@@ -135,7 +135,7 @@ perlsio_binmode(FILE *fp, int iotype, int mode)
      * This used to be contents of do_binmode in doio.c
      */
 #ifdef DOSISH
-#  if defined(atarist) || defined(__MINT__)
+#  if defined(atarist)
     PERL_UNUSED_ARG(iotype);
     if (!fflush(fp)) {
         if (mode & O_BINARY)