Replace some obsolete aliases in documentation

* doc/misc/efaq-w32.texi (Incoming mail with Rmail):
* doc/misc/speedbar.texi (Major Display Modes):
* lisp/mh-e/mh-folder.el (mh-restore-desktop-buffer):
Doc fixes re obsolete aliases.
; * lisp/autoinsert.el (auto-insert):
; * lisp/ffap.el (ffap-newfile-prompt):
; * lisp/woman.el (woman-insert-file-contents): Comment fixes.
This commit is contained in:
Glenn Morris 2018-03-07 15:41:29 -05:00
parent 317da2ace5
commit 6bcb48cf27
6 changed files with 11 additions and 11 deletions

View file

@ -1595,7 +1595,7 @@ non-@code{nil}, you should set it to @code{nil}:
@cindex movemail, using pop3 @cindex movemail, using pop3
@cindex MAILHOST @cindex MAILHOST
@vindex rmail-primary-inbox-list @vindex rmail-primary-inbox-list
@vindex rmail-pop-password-required @vindex rmail-remote-password-required
For incoming mail using the Rmail package and a POP3 server, you will For incoming mail using the Rmail package and a POP3 server, you will
need the following configuration: need the following configuration:
@ -1603,7 +1603,7 @@ need the following configuration:
@example @example
(setenv "MAILHOST" "@var{domain.name.of.your.pop3.server}") (setenv "MAILHOST" "@var{domain.name.of.your.pop3.server}")
(setq rmail-primary-inbox-list '("po:@var{your logon id}")) (setq rmail-primary-inbox-list '("po:@var{your logon id}"))
(setq rmail-pop-password-required t) (setq rmail-remote-password-required t)
@end example @end example
@node Incoming mail with Gnus @node Incoming mail with Gnus

View file

@ -979,8 +979,8 @@ With a numeric argument (@kbd{C-u}), flush cached data before expanding.
Contract the item under the cursor. Contract the item under the cursor.
@end table @end table
@cindex @code{speedbar-line-path} @cindex @code{speedbar-line-directory}
These function require that function @code{speedbar-line-path} be These functions require that the function @code{speedbar-line-directory} be
correctly overloaded to work. correctly overloaded to work.
Next, register your extension like this; Next, register your extension like this;
@ -1013,14 +1013,14 @@ like this:
(speedbar-add-mode-functions-list (speedbar-add-mode-functions-list
'("MYEXTENSION" '("MYEXTENSION"
(speedbar-item-info . MyExtension-speedbar-item-info) (speedbar-item-info . MyExtension-speedbar-item-info)
(speedbar-line-path . MyExtension-speedbar-line-path))) (speedbar-line-directory . MyExtension-speedbar-line-directory)))
@end example @end example
The first element in the list is the name of you extension. The second The first element in the list is the name of you extension. The second
is an alist of functions to overload. The function to overload is is an alist of functions to overload. The function to overload is
first, followed by what you want called instead. first, followed by what you want called instead.
For @code{speedbar-line-path} your function should take an optional DEPTH For @code{speedbar-line-directory} your function should take an optional DEPTH
parameter. This is the starting depth for heavily indented lines. If parameter. This is the starting depth for heavily indented lines. If
it is not provided, you can derive it like this: it is not provided, you can derive it like this:

View file

@ -386,7 +386,7 @@ Matches the visited file name against the elements of `auto-insert-alist'."
(not (eq this-command 'auto-insert)) (not (eq this-command 'auto-insert))
(set-buffer-modified-p (eq auto-insert t))))) (set-buffer-modified-p (eq auto-insert t)))))
;; Return nil so that it could be used in ;; Return nil so that it could be used in
;; `find-file-not-found-hooks', though that's probably inadvisable. ;; `find-file-not-found-functions', though that's probably inadvisable.
nil) nil)

View file

@ -248,7 +248,7 @@ it passes it on to `dired'."
(defcustom ffap-newfile-prompt nil (defcustom ffap-newfile-prompt nil
;; Suggestion from RHOGEE, 11 Jul 1994. Disabled, I think this is ;; Suggestion from RHOGEE, 11 Jul 1994. Disabled, I think this is
;; better handled by `find-file-not-found-hooks'. ;; better handled by `find-file-not-found-functions'.
"Whether `find-file-at-point' prompts about a nonexistent file." "Whether `find-file-at-point' prompts about a nonexistent file."
:type 'boolean :type 'boolean
:group 'ffap) :group 'ffap)

View file

@ -88,7 +88,7 @@ the MH mail system."
When desktop creates a buffer, DESKTOP-BUFFER-FILE-NAME holds the When desktop creates a buffer, DESKTOP-BUFFER-FILE-NAME holds the
file name to visit, DESKTOP-BUFFER-NAME holds the desired buffer file name to visit, DESKTOP-BUFFER-NAME holds the desired buffer
name, and DESKTOP-BUFFER-MISC holds a list of miscellaneous info name, and DESKTOP-BUFFER-MISC holds a list of miscellaneous info
used by the `desktop-buffer-handlers' functions." used by the `desktop-buffer-mode-handlers' functions."
(mh-find-path) (mh-find-path)
(mh-visit-folder desktop-buffer-name) (mh-visit-folder desktop-buffer-name)
(current-buffer)) (current-buffer))

View file

@ -1759,8 +1759,8 @@ Leave point at end of new text. Return length of inserted text."
(condition-case () (condition-case ()
(insert-file-contents filename nil) (insert-file-contents filename nil)
(file-error (file-error
;; Run find-file-not-found-hooks until one returns non-nil. ;; Run find-file-not-found-functions until one returns non-nil.
;; (run-hook-with-args-until-success 'find-file-not-found-hooks) ;; (run-hook-with-args-until-success 'find-file-not-found-functions)
(insert "\n***** File " filename " not found! *****\n\n"))))))) (insert "\n***** File " filename " not found! *****\n\n")))))))