perl5.001 patch.1c

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

diff --git a/perl.c b/perl.c
index 0f80659..94b329b 100644 (file)
--- a/perl.c
+++ b/perl.c
@@ -833,10 +833,12 @@ I32 namlen;
 
 #if defined(DOSISH)
 #    define PERLLIB_SEP ';'
-#elif defined(VMS)
-#    define PERLLIB_SEP '|'
 #else
+#  if defined(VMS)
+#    define PERLLIB_SEP '|'
+#  else
 #    define PERLLIB_SEP ':'
+#  endif
 #endif
 
 static void