From: H.Merijn Brand <h.m.brand@xs4all.nl>
Date: Wed, 12 Dec 2001 11:28:13 +0000 (+0100)
Subject: doio fatal on cygwin for 13651
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=8b24e160a9bb9b9b36e347d7f037058433ec43e6;p=p5sagit%2Fp5-mst-13.2.git

doio fatal on cygwin for 13651
Message-Id: <20011212112548.4611.H.M.BRAND@hccnet.nl>

p4raw-id: //depot/perl@13653
---

diff --git a/doio.c b/doio.c
index cad08a7..4e977b7 100644
--- a/doio.c
+++ b/doio.c
@@ -1109,7 +1109,7 @@ Perl_do_binmode(pTHX_ PerlIO *fp, int iotype, int mode)
   */
  char *name = ":raw";
 #ifdef PERLIO_USING_CRLF
- if (!(mode & O_BINARY)))
+ if (!(mode & O_BINARY))
      name = ":crlf";
 #endif
  return PerlIO_binmode(aTHX_ fp, iotype, mode, name);