diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/autoinsert.el | 2 | ||||
| -rw-r--r-- | lisp/ffap.el | 2 | ||||
| -rw-r--r-- | lisp/mh-e/mh-folder.el | 2 | ||||
| -rw-r--r-- | lisp/woman.el | 4 |
4 files changed, 5 insertions, 5 deletions
diff --git a/lisp/autoinsert.el b/lisp/autoinsert.el index f2ca52b1a19..dfa5b603068 100644 --- a/lisp/autoinsert.el +++ b/lisp/autoinsert.el | |||
| @@ -386,7 +386,7 @@ Matches the visited file name against the elements of `auto-insert-alist'." | |||
| 386 | (not (eq this-command 'auto-insert)) | 386 | (not (eq this-command 'auto-insert)) |
| 387 | (set-buffer-modified-p (eq auto-insert t))))) | 387 | (set-buffer-modified-p (eq auto-insert t))))) |
| 388 | ;; Return nil so that it could be used in | 388 | ;; Return nil so that it could be used in |
| 389 | ;; `find-file-not-found-hooks', though that's probably inadvisable. | 389 | ;; `find-file-not-found-functions', though that's probably inadvisable. |
| 390 | nil) | 390 | nil) |
| 391 | 391 | ||
| 392 | 392 | ||
diff --git a/lisp/ffap.el b/lisp/ffap.el index 4e479d1b82b..22be2f85369 100644 --- a/lisp/ffap.el +++ b/lisp/ffap.el | |||
| @@ -248,7 +248,7 @@ it passes it on to `dired'." | |||
| 248 | 248 | ||
| 249 | (defcustom ffap-newfile-prompt nil | 249 | (defcustom ffap-newfile-prompt nil |
| 250 | ;; Suggestion from RHOGEE, 11 Jul 1994. Disabled, I think this is | 250 | ;; Suggestion from RHOGEE, 11 Jul 1994. Disabled, I think this is |
| 251 | ;; better handled by `find-file-not-found-hooks'. | 251 | ;; better handled by `find-file-not-found-functions'. |
| 252 | "Whether `find-file-at-point' prompts about a nonexistent file." | 252 | "Whether `find-file-at-point' prompts about a nonexistent file." |
| 253 | :type 'boolean | 253 | :type 'boolean |
| 254 | :group 'ffap) | 254 | :group 'ffap) |
diff --git a/lisp/mh-e/mh-folder.el b/lisp/mh-e/mh-folder.el index 23cc2baab79..82e28e8741d 100644 --- a/lisp/mh-e/mh-folder.el +++ b/lisp/mh-e/mh-folder.el | |||
| @@ -88,7 +88,7 @@ the MH mail system." | |||
| 88 | When desktop creates a buffer, DESKTOP-BUFFER-FILE-NAME holds the | 88 | When desktop creates a buffer, DESKTOP-BUFFER-FILE-NAME holds the |
| 89 | file name to visit, DESKTOP-BUFFER-NAME holds the desired buffer | 89 | file name to visit, DESKTOP-BUFFER-NAME holds the desired buffer |
| 90 | name, and DESKTOP-BUFFER-MISC holds a list of miscellaneous info | 90 | name, and DESKTOP-BUFFER-MISC holds a list of miscellaneous info |
| 91 | used by the `desktop-buffer-handlers' functions." | 91 | used by the `desktop-buffer-mode-handlers' functions." |
| 92 | (mh-find-path) | 92 | (mh-find-path) |
| 93 | (mh-visit-folder desktop-buffer-name) | 93 | (mh-visit-folder desktop-buffer-name) |
| 94 | (current-buffer)) | 94 | (current-buffer)) |
diff --git a/lisp/woman.el b/lisp/woman.el index 73f18b0dd6a..533f14674ab 100644 --- a/lisp/woman.el +++ b/lisp/woman.el | |||
| @@ -1759,8 +1759,8 @@ Leave point at end of new text. Return length of inserted text." | |||
| 1759 | (condition-case () | 1759 | (condition-case () |
| 1760 | (insert-file-contents filename nil) | 1760 | (insert-file-contents filename nil) |
| 1761 | (file-error | 1761 | (file-error |
| 1762 | ;; Run find-file-not-found-hooks until one returns non-nil. | 1762 | ;; Run find-file-not-found-functions until one returns non-nil. |
| 1763 | ;; (run-hook-with-args-until-success 'find-file-not-found-hooks) | 1763 | ;; (run-hook-with-args-until-success 'find-file-not-found-functions) |
| 1764 | (insert "\n***** File " filename " not found! *****\n\n"))))))) | 1764 | (insert "\n***** File " filename " not found! *****\n\n"))))))) |
| 1765 | 1765 | ||
| 1766 | 1766 | ||