(set-visited-file-name): Don't call backup-enable-predicate

when buffer-file-name is nil.
1998-02-27 22:13:26 +00:00
parent 9b3d0a18fa
commit 4d49551aee
1 changed files with 2 additions and 1 deletions
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1735,7 +1735,8 @@ the old visited file has been renamed to the new name FILENAME."
  (kill-local-variable 'vc-mode)
  ;; 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 buffer-file-name
+       (not (funcall backup-enable-predicate buffer-file-name))
       (progn
 	 (make-local-variable 'backup-inhibited)
 	 (setq backup-inhibited t)))