1 files changed, 1 insertions, 1 deletions
diff --git a/perl.c b/perl.c
index e94c2ad603..f387cf1f75 100644
--- a/perl.c
+++ b/perl.c
@@ -4616,7 +4616,7 @@ Perl_my_failure_exit(pTHX)
 	    STATUS_NATIVE_SET(44);
     }
     else {
-	if (!vaxc$errno && errno)	/* unlikely */
+	if (!vaxc$errno)		/* unlikely */
 	    STATUS_NATIVE_SET(44);
 	else
 	    STATUS_NATIVE_SET(vaxc$errno);