aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/startup.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/startup.el b/lisp/startup.el
index 4d0af4fe27e..ad09ff2e834 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1671,7 +1671,7 @@ To quit a partially entered command, type Control-g.\n")
1671 ;; use precomputed string to save lots of time. 1671 ;; use precomputed string to save lots of time.
1672 (if (and (eq (key-binding "\C-h") 'help-command) 1672 (if (and (eq (key-binding "\C-h") 'help-command)
1673 (eq (key-binding "\C-xu") 'advertised-undo) 1673 (eq (key-binding "\C-xu") 'advertised-undo)
1674 (eq (key-binding "\C-x\C-c") 'save-buffers-kill-terminal) 1674 (eq (key-binding "\C-x\C-c") 'save-buffers-kill-emacs)
1675 (eq (key-binding "\C-ht") 'help-with-tutorial) 1675 (eq (key-binding "\C-ht") 'help-with-tutorial)
1676 (eq (key-binding "\C-hi") 'info) 1676 (eq (key-binding "\C-hi") 'info)
1677 (eq (key-binding "\C-hr") 'info-emacs-manual) 1677 (eq (key-binding "\C-hr") 'info-emacs-manual)
@@ -1726,7 +1726,7 @@ Get help\t %s
1726 'action (lambda (button) (view-order-manuals)) 1726 'action (lambda (button) (view-order-manuals))
1727 'follow-link t) 1727 'follow-link t)
1728 (insert (substitute-command-keys 1728 (insert (substitute-command-keys
1729 "\t \\[view-order-manuals]\tExit Emacs\t \\[save-buffers-kill-terminal]"))) 1729 "\t \\[view-order-manuals]\tExit Emacs\t \\[save-buffers-kill-emacs]")))
1730 1730
1731 ;; Say how to use the menu bar with the keyboard. 1731 ;; Say how to use the menu bar with the keyboard.
1732 (insert "\n") 1732 (insert "\n")