(Fexpand_file_name) [VMS]: Don't upcase the name "manually";

this is now handled generally via FILE_SYSTEM_CASE.

diff --git a/src/ChangeLog b/src/ChangeLog
index 2384b07b428ab08ee3cf46a460dc0a3a9fce3696..56f07d13b374364933c8ebe5839ab9490281f955 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,9 @@
+2005-03-03  Thien-Thi Nguyen  <ttn@gnu.org>
+
+       * s/vms.h (FILE_SYSTEM_CASE): New macro.
+       * fileio.c (Fexpand_file_name) [VMS]: Don't upcase the name
+       "manually"; this is now handled generally via FILE_SYSTEM_CASE.
+
 2005-03-03  Thien-Thi Nguyen  <ttn@gnu.org>
 
        * fileio.c (FILE_SYSTEM_CASE): Define macro if not already defined.

diff --git a/src/fileio.c b/src/fileio.c
index d73976d2226e566e1dab6a7f86e0682497828c00..cd4328b3f96daca1aaedc7c97cd920a20e47816e 100644 (file)
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -1098,10 +1098,6 @@ See also the function `substitute-in-file-name'.")
       UNGCPRO;
     }
 
-#ifdef VMS
-  /* Filenames on VMS are always upper case.  */
-  name = Fupcase (name);
-#endif
   name = FILE_SYSTEM_CASE (name);
   nm = XSTRING (name)->data;