diff options
| author | Phillip Lord | 2016-03-13 18:33:10 +0000 |
|---|---|---|
| committer | Phillip Lord | 2016-03-13 18:33:10 +0000 |
| commit | ba24c99ec665501fb05cabd77c4115fa1fa9c305 (patch) | |
| tree | 78762744f95ab0267eb515c075287e8bdade05da | |
| parent | d457fd9dc782465e1547f74021390c9d5951d6af (diff) | |
| download | emacs-ba24c99ec665501fb05cabd77c4115fa1fa9c305.tar.gz emacs-ba24c99ec665501fb05cabd77c4115fa1fa9c305.zip | |
Revert "Simplify "Visit New File" to "New File""
This reverts commit d457fd9dc782465e1547f74021390c9d5951d6af.
| -rw-r--r-- | doc/emacs/files.texi | 2 | ||||
| -rw-r--r-- | lisp/menu-bar.el | 2 | ||||
| -rw-r--r-- | lisp/startup.el | 4 |
3 files changed, 4 insertions, 4 deletions
diff --git a/doc/emacs/files.texi b/doc/emacs/files.texi index c482b90d953..ab20d4a18f9 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}. | |||
| 288 | 288 | ||
| 289 | On text-mode terminals and on graphical displays when Emacs was | 289 | On text-mode terminals and on graphical displays when Emacs was |
| 290 | built without a GUI toolkit, you can visit files via the menu-bar | 290 | built without a GUI toolkit, you can visit files via the menu-bar |
| 291 | @samp{File} menu, which has a @samp{New File} item. | 291 | @samp{File} menu, which has a @samp{Visit New File} item. |
| 292 | 292 | ||
| 293 | Each time you visit a file, Emacs automatically scans its contents | 293 | Each time you visit a file, Emacs automatically scans its contents |
| 294 | to detect what character encoding and end-of-line convention it uses, | 294 | 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 0557214fe24..6281d7e5453 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el | |||
| @@ -192,7 +192,7 @@ | |||
| 192 | :enable (menu-bar-non-minibuffer-window-p) | 192 | :enable (menu-bar-non-minibuffer-window-p) |
| 193 | :help "Read an existing file into an Emacs buffer")) | 193 | :help "Read an existing file into an Emacs buffer")) |
| 194 | (bindings--define-key menu [new-file] | 194 | (bindings--define-key menu [new-file] |
| 195 | '(menu-item "New File..." find-file | 195 | '(menu-item "Visit New File..." find-file |
| 196 | :enable (menu-bar-non-minibuffer-window-p) | 196 | :enable (menu-bar-non-minibuffer-window-p) |
| 197 | :help "Specify a new file's name, to edit the file")) | 197 | :help "Specify a new file's name, to edit the file")) |
| 198 | 198 | ||
diff --git a/lisp/startup.el b/lisp/startup.el index a411891d1f6..15a79f6f5bf 100644 --- a/lisp/startup.el +++ b/lisp/startup.el | |||
| @@ -1998,7 +1998,7 @@ To quit a partially entered command, type Control-g.\n") | |||
| 1998 | (insert " How to order printed manuals from the FSF\n") | 1998 | (insert " How to order printed manuals from the FSF\n") |
| 1999 | 1999 | ||
| 2000 | (insert "\nUseful tasks:\n") | 2000 | (insert "\nUseful tasks:\n") |
| 2001 | (insert-button "New File" | 2001 | (insert-button "Visit New File" |
| 2002 | 'action (lambda (_button) (call-interactively 'find-file)) | 2002 | 'action (lambda (_button) (call-interactively 'find-file)) |
| 2003 | 'follow-link t) | 2003 | 'follow-link t) |
| 2004 | (insert (substitute-command-keys | 2004 | (insert (substitute-command-keys |
| @@ -2075,7 +2075,7 @@ If you have no Meta key, you may instead type ESC followed by the character.)")) | |||
| 2075 | ;; Insert links to useful tasks | 2075 | ;; Insert links to useful tasks |
| 2076 | (insert "\nUseful tasks:\n") | 2076 | (insert "\nUseful tasks:\n") |
| 2077 | 2077 | ||
| 2078 | (insert-button "New File" | 2078 | (insert-button "Visit New File" |
| 2079 | 'action (lambda (_button) (call-interactively 'find-file)) | 2079 | 'action (lambda (_button) (call-interactively 'find-file)) |
| 2080 | 'follow-link t) | 2080 | 'follow-link t) |
| 2081 | (insert "\t\t\t") | 2081 | (insert "\t\t\t") |