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

when buffer-file-name is nil.

diff --git a/lisp/files.el b/lisp/files.el
index e1c80a6ef6fceb75500e329291b2d15e7dd0fe84..a3ea8adac28ac1c889f28e6c4fc7a33b5b37617b 100644 (file)
--- 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)))