mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-04 11:40:22 +00:00
Code Issues Releases Activity

(command-line-1): Add info about ordering manuals

Browse Source 
to the not so fancy splash screens.
This commit is contained in:
Gerd Moellmann 2001-02-26 14:17:29 +00:00
parent 3879075511
commit 0145964874
2 changed files with 14 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
lisp/ChangeLog
View File

@ -1,7 +1,14 @@
2001-02-26 Gerd Moellmann <gerd@gnu.org>
* help.el (view-order-manuals): Use goto-address.
* startup.el (command-line-1): Add info about ordering manuals
to the not so fancy splash screens.
2001-02-26 Andre Spiegel <spiegel@gnu.org>
* vc.el (vc-default-workfile-unchanged-p,
vc-default-latest-on-branch-p): Add missing BACKEND argument.
* vc.el (vc-default-workfile-unchanged-p)
(vc-default-latest-on-branch-p): Add missing BACKEND argument.
2001-02-26 Gerd Moellmann <gerd@gnu.org>

7
lisp/startup.el
View File

@ -1310,6 +1310,7 @@ Emacs FAQ Frequently asked questions and answers
\(Non)Warranty GNU Emacs comes with ABSOLUTELY NO WARRANTY
Copying Conditions Conditions for redistributing and changing Emacs.
Getting New Versions How to obtain the latest version of Emacs.
Ordering Manuals How to order manuals from the FSF.
")
(insert "\n\n" (emacs-version)
"
@ -1326,14 +1327,16 @@ Copyright (C) 2000 Free Software Foundation, Inc.")))
(insert "
Get help C-h (Hold down CTRL and press h)
Undo changes C-x u Exit Emacs C-x C-c
Get a tutorial C-h t Use Info to read docs C-h i")
Get a tutorial C-h t Use Info to read docs C-h i
Ordering manuals C-h RET")
(insert (substitute-command-keys
(format "\n
Get help %s
Undo changes \\[advertised-undo]
Exit Emacs \\[save-buffers-kill-emacs]
Get a tutorial \\[help-with-tutorial]
Use Info to read docs \\[info]"
Use Info to read docs \\[info]
Ordering manuals \\[view-order-manuals]"
(let ((where (where-is-internal
'help-command nil t)))
(if where