Mercurial > emacs
changeset 11045:b4bf1f2d99f8
(make-auto-save-file-name, auto-save-file-name-p): Doc fixes.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 16 Mar 1995 23:28:27 +0000 |
| parents | 796be3f4f8a1 |
| children | a9045ed63e20 |
| files | lisp/vms-patch.el |
| diffstat | 1 files changed, 8 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/vms-patch.el Thu Mar 16 23:04:55 1995 +0000 +++ b/lisp/vms-patch.el Thu Mar 16 23:28:27 1995 +0000 @@ -54,10 +54,11 @@ (defun make-auto-save-file-name () "Return file name to use for auto-saves of current buffer. -Does not consider auto-save-visited-file-name; that is checked -before calling this function. -This is a separate function so your .emacs file or site-init.el can redefine it. -See also auto-save-file-name-p." +This function does not consider `auto-save-visited-file-name'; +the caller should check that before calling this function. +This is a separate function so that your `.emacs' file or the site's +`site-init.el' can redefine it. +See also `auto-save-file-name-p'." (if buffer-file-name (concat (file-name-directory buffer-file-name) "_$" @@ -66,9 +67,10 @@ (expand-file-name (concat "_$_" (make-legal-file-name (buffer-name)) "$")))) (defun auto-save-file-name-p (filename) - "Return t if FILENAME can be yielded by make-auto-save-file-name. + "Return t if FILENAME can be yielded by `make-auto-save-file-name'. FILENAME should lack slashes. -This is a separate function so your .emacs file or site-init.el can redefine it." +This is a separate function so that your `.emacs' file or the site's +`site-init.el' can redefine it." (string-match "^_\\$.*\\$" filename)) ;;;