NetWare has PRIVLIB_EXP as something other than a string constant. Cope with it.

1 files changed, 4 insertions, 0 deletions

diff --git a/perl.c b/perl.c
index 34f95ded4b..487cc3857d 100644
--- a/perl.c
+++ b/perl.c
@@ -4238,7 +4238,11 @@ S_init_perllib(pTHX_ U32 old_vers)
 	if (s)
 	    incpush_use_sep(s, len, INCPUSH_ADD_SUB_DIRS|INCPUSH_CAN_RELOCATE);
 #else
+#  ifdef NETWARE
+	S_incpush_use_sep(aTHX_ PRIVLIB_EXP, 0, INCPUSH_CAN_RELOCATE);
+#  else
 	S_incpush_use_sep(aTHX_ STR_WITH_LEN(PRIVLIB_EXP), INCPUSH_CAN_RELOCATE);
+#  endif
 #endif
     }