From 030d4f6224c52dadfd63faf7d061effcb2c89f7f Mon Sep 17 00:00:00 2001
From: Thien-Thi Nguyen <ttn@gnuvola.org>
Date: Thu, 3 Mar 2005 20:56:40 +0000
Subject: [PATCH] (FILE_SYSTEM_CASE): New macro.
---
src/s/vms.h | 7 +++++--
1 file changed, 5 insertions(+), 2 deletions(-)
diff --git a/src/s/vms.h b/src/s/vms.h
index e95212c5624..aa4f0991dfe 100644
--- a/src/s/vms.h
+++ b/src/s/vms.h
@@ -130,11 +130,14 @@ Boston, MA 02111-1307, USA. */
#define LINK_CRTL_SHARE
/* Define this if you want to read the file SYS$SYSTEM:SYSUAF.DAT for user
- information. If you do use this, you must either make SYSUAF.DAT world
+ information. If you do use this, you must either make SYSUAF.DAT world
readable or install Emacs with SYSPRV. */
/* #define READ_SYSUAF */
+/* Traditionally, filenames on VMS are always upper case. */
+#define FILE_SYSTEM_CASE Fupcase
+
/* On VMS these have a different name */
#define index strchr
@@ -192,7 +195,7 @@ extern double mth$dmod(double, double);
/* If user asks for TERM, check first for EMACS_TERM. */
#define getenv sys_getenv
-
+
/* Standard C abort is less useful than it should be. */
#define abort sys_abort
--
2.39.5