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

when buffer-file-name is nil.

1 files changed, 2 insertions, 1 deletions

diff --git a/lisp/files.el b/lisp/files.el
index e1c80a6ef6f..a3ea8adac28 100644
--- 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)))