From: Craig A. Berry <craigberry@mac.com>
Date: Thu, 15 Jun 2006 03:20:48 +0000 (+0000)
Subject: only use NAML$M_OPEN_SPECIAL where it exists
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ea0c9945451f56a84f32146fc82b0bf755b08003;p=p5sagit%2Fp5-mst-13.2.git

only use NAML$M_OPEN_SPECIAL where it exists

p4raw-id: //depot/perl@28396
---

diff --git a/vms/vms.c b/vms/vms.c
index 4bb2223..8a30a55 100644
--- a/vms/vms.c
+++ b/vms/vms.c
@@ -5996,7 +5996,9 @@ int unixlen;
   mynam.naml$b_rss = 0;
   if (decc_efs_case_preserve)
     mynam.naml$b_nop |= NAM$M_NO_SHORT_UPCASE;
+#ifdef NAML$M_OPEN_SPECIAL
   mynam.naml$l_input_flags |= NAML$M_OPEN_SPECIAL;
+#endif
 
   /* Set up the remaining naml fields */
   sts = sys$parse(&myfab);