Mercurial > emacs
changeset 75090:fad48f2b43ab
(find-file-noselect-1, set-visited-file-name):
Allow backup-enable-predicate to be nil.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 04 Jan 2007 22:14:32 +0000 |
| parents | 808654e7c05a |
| children | 2036fbeca1f2 |
| files | lisp/files.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/files.el Thu Jan 04 21:46:11 2007 +0000 +++ b/lisp/files.el Thu Jan 04 22:14:32 2007 +0000 @@ -1650,7 +1650,8 @@ (setq default-directory (file-name-directory buffer-file-name)) ;; Turn off backup files for certain file names. Since ;; this is a permanent local, the major mode won't eliminate it. - (and (not (funcall backup-enable-predicate buffer-file-name)) + (and backup-enable-predicate + (not (funcall backup-enable-predicate buffer-file-name)) (progn (make-local-variable 'backup-inhibited) (setq backup-inhibited t))) @@ -2904,6 +2905,7 @@ ;; Turn off backup files for certain file names. ;; Since this is a permanent local, the major mode won't eliminate it. (and buffer-file-name + backup-enable-predicate (not (funcall backup-enable-predicate buffer-file-name)) (progn (make-local-variable 'backup-inhibited)