From ea0c9945451f56a84f32146fc82b0bf755b08003 Mon Sep 17 00:00:00 2001
From: "Craig A. Berry" <craigberry@mac.com>
Date: Thu, 15 Jun 2006 03:20:48 +0000
Subject: [PATCH] only use NAML$M_OPEN_SPECIAL where it exists

p4raw-id: //depot/perl@28396
---
 vms/vms.c | 2 ++
 1 file changed, 2 insertions(+)

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);
-- 
2.7.4