1 files changed, 1 insertions, 1 deletions
diff --git a/perl.c b/perl.c
index 0569d5b426..297e90411b 100644
--- a/perl.c
+++ b/perl.c
@@ -3759,7 +3759,7 @@ S_init_postdump_symbols(pTHX_ register int argc, register char **argv, register
 	  for (; *env; env++) {
 	    if (!(s = strchr(*env,'=')))
 		continue;
-#if defined(MSDOS)
+#if defined(MSDOS) && !defined(DJGPP)
 	    *s = '\0';
 	    (void)strupr(*env);
 	    *s = '=';