and [BUG] \X and \C fixed, \X still dorked

[p5sagit/p5-mst-13.2.git] / perl.h

diff --git a/perl.h b/perl.h
index dbfadc8..d25ffd7 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -1814,13 +1814,6 @@ typedef struct clone_params CLONE_PARAMS;
 #  define USE_ENVIRON_ARRAY
 #endif
 
-#ifdef JPL
-    /* E.g. JPL needs to operate on a copy of the real environment.
-     * JDK 1.2 and 1.3 seem to get upset if the original environment
-     * is diddled with. */
-#   define NEED_ENVIRON_DUP_FOR_MODIFY
-#endif
-
 /*
  * initialise to avoid floating-point exceptions from overflow, etc
  */
@@ -3945,11 +3938,11 @@ int flock(int fd, int op);
     /* If you have different O_TEXT and O_BINARY and you are a CLRF shop,
      * that is, you are somehow DOSish. */
 #   if !defined(__BEOS__)
-#      define PERLIO_CLRF 1
+#      define PERLIO_USING_CRLF 1
 #   else
     /* If you have O_TEXT different from your O_BINARY but you still are
      * not a CRLF shop. */
-#       undef PERLIO_CLRF
+#       undef PERLIO_USING_CRLF
 #   endif
 #endif