Detypo and rename.

p4raw-id: //depot/perl@13637

1 files changed, 1 insertions, 1 deletions

diff --git a/doio.c b/doio.c
index 2577b2f316..cad08a7d0d 100644
--- a/doio.c
+++ b/doio.c
@@ -1108,7 +1108,7 @@ Perl_do_binmode(pTHX_ PerlIO *fp, int iotype, int mode)
   * This is a stub for any XS code which might have been calling it.
   */
  char *name = ":raw";
-#ifdef PERLIO_CRLF
+#ifdef PERLIO_USING_CRLF
  if (!(mode & O_BINARY)))
      name = ":crlf";
 #endif