[Emacs-diffs] trunk r117663: Remove remaining mentions of VMS as a host

[Reuben Thomas]

------------------------------------------------------------
revno: 117663
revision-id: address@hidden
parent: address@hidden
committer: Reuben Thomas <address@hidden>
branch nick: trunk
timestamp: Thu 2014-08-07 12:49:36 +0100
message:
  Remove remaining mentions of VMS as a host
  
  * notes/exit-value: Remove specific discussion of VMS.
  * doc/emacs/programs.texi (Program Modes): Don't advertise VMS DCL support
  any more.
  * doc/misc/ediff.texi (Merging and diff3): Don't mention lack of support
  for VMS diff, we no longer support VMS.
  * lisp/progmodes/ada-mode.el:
  * lisp/net/tramp.el (tramp-handle-file-symlink-p):
  * lisp/net/tramp-ftp.el (tramp-ftp-file-name-handler): Remove a comment
  about VMS, which we no longer support.
  * lisp/progmodes/ada-xref.el (ada-xref-current): Remove mention of VMS,
  and fix a FIXME, using convert-standard-filename in place of
  removed ada-convert-file-name.
  * lisp/url/url-handlers.el: Remove a comment about VMS, which we no longer
  support.
modified:
  admin/ChangeLog                changelog-20091113204419-o5vbwnq5f7feedwu-2226
  admin/notes/exit-value         exitvalue-20091113204419-o5vbwnq5f7feedwu-3016
  doc/emacs/ChangeLog            changelog-20091113204419-o5vbwnq5f7feedwu-6227
  doc/emacs/programs.texi        
programs.texi-20091113204419-o5vbwnq5f7feedwu-6272
  doc/misc/ChangeLog             changelog-20091113204419-o5vbwnq5f7feedwu-6331
  doc/misc/ediff.texi            ediff.texi-20091113204419-o5vbwnq5f7feedwu-6296
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/files.el                  files.el-20091113204419-o5vbwnq5f7feedwu-265
  lisp/net/tramp-ftp.el          
trampftp.el-20091113204419-o5vbwnq5f7feedwu-2514
  lisp/net/tramp.el              tramp.el-20091113204419-o5vbwnq5f7feedwu-2427
  lisp/progmodes/ada-mode.el     adamode.el-20091113204419-o5vbwnq5f7feedwu-834
  lisp/progmodes/ada-xref.el     adaxref.el-20091113204419-o5vbwnq5f7feedwu-1625
  lisp/url/ChangeLog             changelog-20091113204419-o5vbwnq5f7feedwu-3116
  lisp/url/url-handlers.el       
urlhandlers.el-20091113204419-o5vbwnq5f7feedwu-2987

=== modified file 'admin/ChangeLog'
--- a/admin/ChangeLog   2014-08-07 09:55:09 +0000
+++ b/admin/ChangeLog   2014-08-07 11:49:36 +0000
@@ -1,5 +1,9 @@
 2014-08-07  Reuben Thomas  <address@hidden>
 
+       * notes/exit-value: Remove specific discussion of VMS.
+
+2014-08-07  Reuben Thomas  <address@hidden>
+
        Refer to MS-DOS using the same name everywhere.
 
        * FOR-RELEASE: ``MS-DOG'', ``MSDOG'' and ``msdog'' become

=== modified file 'admin/notes/exit-value'
--- a/admin/notes/exit-value    2011-05-10 13:57:12 +0000
+++ b/admin/notes/exit-value    2014-08-07 11:49:36 +0000
@@ -1,35 +1,28 @@
 ttn 2004-05-09
 
-The exit value of a program returning to the shell on unixoid systems is
-typically 0 for success, and non-0 (such as 1) for failure.  For vms it is
-odd (1,3,5...) for success, even (0,2,4...) for failure.
-
-This holds from the point of view of the "shell" (in quotes because vms has a
-different dispatch model that is not explained further here).
-
-From the point of view of the program, nowadays stdlib.h on both type of
-systems provides macros `EXIT_SUCCESS' and `EXIT_FAILURE' that should DTRT.
-
-NB: The numerical values of these macros DO NOT need to fulfill the exit
-value requirements outlined in the first paragraph!  That is the job of the
+The exit value of a program returning to the shell on unixoid systems
+is typically 0 for success, and non-0 (such as 1) for failure. This is
+not always the case on other systems.
+
+From the point of view of the program stdlib.h provides macros
+`EXIT_SUCCESS' and `EXIT_FAILURE' that should DTRT.  N.B. The
+numerical values of these macros DO NOT need to fulfill the exit value
+requirements outlined in the first paragraph!  That is the job of the
 `exit' function.  Thus, this kind of construct shows misunderstanding:
 
-   #ifdef VMS
+   #ifdef WEIRD_OS
       exit (1);
    #else
       exit (0);
    #endif
 
-Values aside from EXIT_SUCCESS and EXIT_FAILURE are tricky.
-
-
-
-ttn 2004-05-12
-
-Values aside from EXIT_SUCCESS and EXIT_FAILURE can be used to indicate
-finer gradations of failure.  If this is the only information available
-to the caller, clamping such values to EXIT_FAILURE loses information.
-If there are other ways to indicate the problem to the caller (such as
-a message to stderr) it may be ok to clamp.  In all cases, it is the
-relationship between the program and its caller that must be examined.
-[Insert ZAMM quote here.]
+Values aside from EXIT_SUCCESS and EXIT_FAILURE are tricky, but can be
+used to indicate finer gradations of failure.  If this is the only
+information available to the caller, clamping such values to
+EXIT_FAILURE loses information.  If there are other ways to indicate
+the problem to the caller (such as a message to stderr) it may be ok
+to clamp.  In all cases, it is the relationship between the program
+and its caller that must be examined.
+
+[Insert ZAMM quote here.] <-- I presume this refers to ``Zen and the
+Art of Motorcycle Maintenance'' - Reuben Thomas <address@hidden>.

=== modified file 'doc/emacs/ChangeLog'
--- a/doc/emacs/ChangeLog       2014-08-07 09:55:09 +0000
+++ b/doc/emacs/ChangeLog       2014-08-07 11:49:36 +0000
@@ -1,5 +1,10 @@
 2014-08-07  Reuben Thomas  <address@hidden>
 
+       * programs.texi (Program Modes): Don't advertise VMS DCL support
+       any more.
+
+2014-08-07  Reuben Thomas  <address@hidden>
+
        Refer to MS-DOS using the same name everywhere.
 
        * Makefile.in (EMACSSOURCES): ``MS-DOG'', ``MSDOG'' and ``msdog''

=== modified file 'doc/emacs/programs.texi'
--- a/doc/emacs/programs.texi   2014-06-07 23:39:40 +0000
+++ b/doc/emacs/programs.texi   2014-08-07 11:49:36 +0000
@@ -88,8 +88,8 @@
 Octave, Pascal, Perl, Pike, PostScript, Prolog, Python, Ruby, Simula, Tcl,
 and address@hidden  An alternative mode for Perl is called CPerl mode.  Modes 
are
 also available for the scripting languages of the common GNU and Unix
-shells, VMS DCL, and MS-DOS/MS-Windows @samp{BAT} files, and for
-makefiles, DNS master files, and various sorts of configuration files.
+shells, and MS-DOS/MS-Windows @samp{BAT} files, and for makefiles,
+DNS master files, and various sorts of configuration files.
 
   Ideally, Emacs should have a major mode for each programming
 language that you might want to edit.  If it doesn't have a mode for

=== modified file 'doc/misc/ChangeLog'
--- a/doc/misc/ChangeLog        2014-08-07 09:15:44 +0000
+++ b/doc/misc/ChangeLog        2014-08-07 11:49:36 +0000
@@ -1,3 +1,8 @@
+2014-08-07  Reuben Thomas  <address@hidden>
+
+       * ediff.texi (Merging and diff3): Don't mention lack of support
+       for VMS diff, we no longer support VMS.
+
 2014-08-07  Michael Albinus  <address@hidden>
 
        * tramp.texi (Remote shell setup): Explain, how to change command

=== modified file 'doc/misc/ediff.texi'
--- a/doc/misc/ediff.texi       2014-06-10 02:20:31 +0000
+++ b/doc/misc/ediff.texi       2014-08-07 11:49:36 +0000
@@ -350,8 +350,7 @@
 to find differences between two files.  They process the @code{diff} output
 and display it in a convenient form.  At present, Ediff understands only
 the plain output from diff.  Options such as @samp{-c} are not supported,
-nor is the format produced by incompatible file comparison programs such as
-the VMS version of @code{diff}.
+nor is the format produced by incompatible file comparison programs.
 
 The functions @code{ediff-files}, @code{ediff-buffers},
 @code{ediff-files3}, @code{ediff-buffers3} first display the coarse,
@@ -1945,11 +1944,6 @@
 
 @end table
 
address@hidden
address@hidden:} Ediff does not support the output format of VMS
address@hidden  Instead, make sure you are using some implementation of POSIX
address@hidden, such as @code{gnudiff}.
-
 @node Merging and diff3
 @section Merging and diff3
 

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2014-08-07 10:15:52 +0000
+++ b/lisp/ChangeLog    2014-08-07 11:49:36 +0000
@@ -1,5 +1,20 @@
 2014-08-07  Reuben Thomas  <address@hidden>
 
+       * progmodes/ada-mode.el:
+       * net/tramp.el (tramp-handle-file-symlink-p):
+       * net/tramp-ftp.el (tramp-ftp-file-name-handler): Remove a comment
+       about VMS, which we no longer support.
+       * progmodes/ada-xref.el (ada-xref-current): Remove mention of VMS,
+       and fix a FIXME, using convert-standard-filename in place of
+       removed ada-convert-file-name.
+
+2014-08-07  Eli Zaretskii  <address@hidden>
+
+       * files.el (auto-mode-alist): Remove support for VMS from a
+       pattern.
+
+2014-08-07  Reuben Thomas  <address@hidden>
+
        Refer to MS-DOS using the same name everywhere.
 
        * arc-mode.el: Fix a couple of ``MS-DOG''s missed in the previous

=== modified file 'lisp/files.el'
--- a/lisp/files.el     2014-08-07 10:15:52 +0000
+++ b/lisp/files.el     2014-08-07 11:49:36 +0000
@@ -2413,7 +2413,7 @@
      ("\\.wy\\'" . wisent-grammar-mode)
      ;; .emacs or .gnus or .viper following a directory delimiter in
      ;; Unix or MS-DOS syntax.
-     ("[]>:/\\]\\..*\\(emacs\\|gnus\\|viper\\)\\'" . emacs-lisp-mode)
+     ("[:/\\]\\..*\\(emacs\\|gnus\\|viper\\)\\'" . emacs-lisp-mode)
      ("\\`\\..*emacs\\'" . emacs-lisp-mode)
      ;; _emacs following a directory delimiter in MS-DOS syntax
      ("[:/]_emacs\\'" . emacs-lisp-mode)

=== modified file 'lisp/net/tramp-ftp.el'
--- a/lisp/net/tramp-ftp.el     2014-06-15 15:47:35 +0000
+++ b/lisp/net/tramp-ftp.el     2014-08-07 11:49:36 +0000
@@ -178,12 +178,7 @@
            (ignore-errors (delete-file tmpfile)))))
 
        ;; Normally, the handlers must be discarded.
-       ;; `inhibit-file-name-handlers' isn't sufficient, because the
-       ;; local file name could be in Tramp syntax as well (for
-       ;; example, returning VMS file names like "/DISK$CAM:/AAA").
-       ;; That's why we set also `tramp-mode' to nil.
-       (t (let* (;(tramp-mode nil)
-                (inhibit-file-name-handlers
+       (t (let* ((inhibit-file-name-handlers
                  (list 'tramp-file-name-handler
                        'tramp-completion-file-name-handler
                        (and (eq inhibit-file-name-operation operation)

=== modified file 'lisp/net/tramp.el'
--- a/lisp/net/tramp.el 2014-07-03 09:27:02 +0000
+++ b/lisp/net/tramp.el 2014-08-07 11:49:36 +0000
@@ -2998,8 +2998,6 @@
   (with-parsed-tramp-file-name filename nil
     (let ((x (car (file-attributes filename))))
       (when (stringp x)
-       ;; When Tramp is running on VMS, then `file-name-absolute-p'
-       ;; might do weird things.
        (if (file-name-absolute-p x)
            (tramp-make-tramp-file-name method user host x)
          x)))))

=== modified file 'lisp/progmodes/ada-mode.el'
--- a/lisp/progmodes/ada-mode.el        2014-01-25 19:15:42 +0000
+++ b/lisp/progmodes/ada-mode.el        2014-08-07 11:49:36 +0000
@@ -31,11 +31,6 @@
 ;; independent from the GNU Ada compiler GNAT, distributed by Ada
 ;; Core Technologies.  All the other files rely heavily on features
 ;; provided only by GNAT.
-;;
-;; Note: this mode will not work with Emacs 19. If you are on a VMS
-;; system, where the latest version of Emacs is 19.28, you will need
-;; another file, called ada-vms.el, that provides some required
-;; functions.
 
 ;;; Usage:
 ;; Emacs should enter Ada mode automatically when you load an Ada file.

=== modified file 'lisp/progmodes/ada-xref.el'
--- a/lisp/progmodes/ada-xref.el        2014-01-01 07:43:34 +0000
+++ b/lisp/progmodes/ada-xref.el        2014-08-07 11:49:36 +0000
@@ -651,12 +651,6 @@
        (find-file (car (cdr pos)))
        (goto-char (car pos)))))
 
-(defun ada-convert-file-name (name)
-  "Convert from NAME to a name that can be used by the compilation commands.
-This is overridden on VMS to convert from VMS filenames to Unix filenames."
-  name)
-;; FIXME: use convert-standard-filename instead
-
 (defun ada-set-default-project-file (file)
   "Set FILE as the current project file."
   (interactive "fProject file:")
@@ -1465,7 +1459,7 @@
           (get-file-buffer ali-file-name))
       (kill-buffer (get-file-buffer ali-file-name)))
 
-  (let* ((name      (ada-convert-file-name file))
+  (let* ((name      (convert-standard-filename file))
         (body-name (or (ada-get-body-name name) name)))
 
     ;; Always recompile the body when we can.  We thus temporarily switch to a

=== modified file 'lisp/url/ChangeLog'
--- a/lisp/url/ChangeLog        2014-08-03 15:38:52 +0000
+++ b/lisp/url/ChangeLog        2014-08-07 11:49:36 +0000
@@ -1,3 +1,8 @@
+2014-08-07  Reuben Thomas  <address@hidden>
+
+       * url-handlers.el: Remove a comment about VMS, which we no longer
+       support.
+
 2014-08-03  Paul Eggert  <address@hidden>
 
        Don't mishandle dates in the year 9999 (Bug#18176).

=== modified file 'lisp/url/url-handlers.el'
--- a/lisp/url/url-handlers.el  2014-06-26 06:55:15 +0000
+++ b/lisp/url/url-handlers.el  2014-08-07 11:49:36 +0000
@@ -51,7 +51,7 @@
 ;; delete-directory                    Finished (DAV)
 ;; delete-file                         Finished (DAV)
 ;; diff-latest-backup-file
-;; directory-file-name                 unnecessary (what about VMS)?
+;; directory-file-name                 unnecessary
 ;; directory-files                     Finished (DAV)
 ;; dired-call-process
 ;; dired-compress-file