1 files changed, 1 insertions, 1 deletions
diff --git a/doio.c b/doio.c
index 7e1645e293..6b92d69d8a 100644
--- a/doio.c
+++ b/doio.c
@@ -824,7 +824,7 @@ Perl_do_binmode(pTHX_ PerlIO *fp, int iotype, int flag)
 #endif
 #else
 #if defined(USEMYBINMODE)
-    if (my_binmode(fp,iotype) != NULL)
+    if (my_binmode(fp,iotype) != FALSE)
 	return 1;
     else
 	return 0;