(FILE_SYSTEM_CASE): New macro.

diff --git a/src/s/vms.h b/src/s/vms.h
index dc7877eaa672711894aada40affaf41f9c895e70..b2de754bb1b81bf434ee672a22d4a3b3f6064371 100644 (file)
--- a/src/s/vms.h
+++ b/src/s/vms.h
@@ -135,6 +135,10 @@ Boston, MA 02111-1307, USA.  */
 
 /* #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