[Emacs-diffs] Changes to emacs/lisp/files.el

[Chong Yidong]

Index: emacs/lisp/files.el
diff -u emacs/lisp/files.el:1.810 emacs/lisp/files.el:1.811
--- emacs/lisp/files.el:1.810   Wed Feb 15 01:21:31 2006
+++ emacs/lisp/files.el Wed Feb 15 01:32:50 2006
@@ -2225,10 +2225,9 @@
     (let ((name (if buffer-file-name
                    (file-name-nondirectory buffer-file-name)
                  (concat "buffer " (buffer-name))))
-         char)
+         prompt char)
       (save-window-excursion
-       (let ((buf (get-buffer-create "*Local Variables*"))
-             (prompt))
+       (let ((buf (get-buffer-create "*Local Variables*")))
          (pop-to-buffer buf)
          (set (make-local-variable 'cursor-type) nil)
          (erase-buffer)
@@ -2284,6 +2283,7 @@
            (customize-save-variable
             'safe-local-variable-values
             safe-local-variable-values))
+         (kill-buffer buf)
          (or (= char ?!)
              (= char ?\s)
              (= char ?y)))))))