(gnus-dribble-read-file): Quote file-precious-flag.

[gnus] / lisp / gnus-start.el

diff --git a/lisp/gnus-start.el b/lisp/gnus-start.el
index 4ea87a6..7a6a9e0 100644 (file)
--- a/lisp/gnus-start.el
+++ b/lisp/gnus-start.el
@@ -865,7 +865,7 @@ prompt the user for the name of an NNTP server to use."
       (set-buffer (setq gnus-dribble-buffer
                        (gnus-get-buffer-create
                         (file-name-nondirectory dribble-file))))
       (set-buffer (setq gnus-dribble-buffer
                        (gnus-get-buffer-create
                         (file-name-nondirectory dribble-file))))

-      (make-variable-buffer-local file-precious-flag)
+      (make-variable-buffer-local 'file-precious-flag)

       (setq file-precious-flag t)
       (erase-buffer)
       (setq buffer-file-name dribble-file)
       (setq file-precious-flag t)
       (erase-buffer)
       (setq buffer-file-name dribble-file)