Change 34562 by [EMAIL PROTECTED] on 2008/10/23 00:26:03
When testing the case sensitivity settings of the process
on VMS, be a little more sensitive to older versions that
don't have the capability.
Affected files ...
... //depot/perl/vms/vms.c#229 edit
Differences ...
==== //depot/perl/vms/vms.c#229 (text) ====
Index: perl/vms/vms.c
--- perl/vms/vms.c#228~34053~ 2008-06-13 17:02:05.000000000 -0700
+++ perl/vms/vms.c 2008-10-22 17:26:03.000000000 -0700
@@ -13617,7 +13617,7 @@
}
#endif
-#if defined(JPI$_CASE_LOOKUP_PERM) && !defined(__VAX)
+#if defined(JPI$_CASE_LOOKUP_PERM) && defined(PPROP$K_CASE_BLIND) &&
!defined(__VAX)
/* Report true case tolerance */
/*----------------------------*/
End of Patch.
