[Emacs-diffs] emacs-25 ba24c99: Revert "Simplify "Visit New File" to "New File""

[Phillip Lord]

branch: emacs-25
commit ba24c99ec665501fb05cabd77c4115fa1fa9c305
Author: Phillip Lord <address@hidden>
Commit: Phillip Lord <address@hidden>

    Revert "Simplify "Visit New File" to "New File""
    
    This reverts commit d457fd9dc782465e1547f74021390c9d5951d6af.
---
 doc/emacs/files.texi |    2 +-
 lisp/menu-bar.el     |    2 +-
 lisp/startup.el      |    4 ++--
 3 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/doc/emacs/files.texi b/doc/emacs/files.texi
index c482b90..ab20d4a 100644
--- a/doc/emacs/files.texi
+++ b/doc/emacs/files.texi
@@ -288,7 +288,7 @@ see @ref{Drag and Drop}, and @ref{Misc Dired Features}.
 
   On text-mode terminals and on graphical displays when Emacs was
 built without a GUI toolkit, you can visit files via the menu-bar
address@hidden menu, which has a @samp{New File} item.
address@hidden menu, which has a @samp{Visit New File} item.
 
   Each time you visit a file, Emacs automatically scans its contents
 to detect what character encoding and end-of-line convention it uses,
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 0557214..6281d7e 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -192,7 +192,7 @@
                   :enable (menu-bar-non-minibuffer-window-p)
                   :help "Read an existing file into an Emacs buffer"))
     (bindings--define-key menu [new-file]
-      '(menu-item "New File..." find-file
+      '(menu-item "Visit New File..." find-file
                   :enable (menu-bar-non-minibuffer-window-p)
                   :help "Specify a new file's name, to edit the file"))
 
diff --git a/lisp/startup.el b/lisp/startup.el
index a411891..15a79f6 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1998,7 +1998,7 @@ To quit a partially entered command, type Control-g.\n")
   (insert "  How to order printed manuals from the FSF\n")
 
   (insert "\nUseful tasks:\n")
-  (insert-button "New File"
+  (insert-button "Visit New File"
                 'action (lambda (_button) (call-interactively 'find-file))
                 'follow-link t)
   (insert (substitute-command-keys
@@ -2075,7 +2075,7 @@ If you have no Meta key, you may instead type ESC 
followed by the character.)"))
   ;; Insert links to useful tasks
   (insert "\nUseful tasks:\n")
 
-  (insert-button "New File"
+  (insert-button "Visit New File"
                 'action (lambda (_button) (call-interactively 'find-file))
                 'follow-link t)
   (insert "\t\t\t")