(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 24a2e7ea0984b041983d24ee8e8d85c9e9b9a528..fc9e157700b09ecc69aa904340847c031de4a1e1 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 3ea474cf94ada3a3092c9c7c688e8d35ba92d6fd..7b07a1cdaa4fbaa39f435d4d39a8abf645a5d2b9 100644 (file)
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -1081,10 +1081,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;