Commit fd1c38f4 authored by Lute Kamstra's avatar Lute Kamstra
Browse files

(custom-get-fresh-buffer): Test for nonexistence buffer.

parent be781fa7
2003-06-03 Lute Kamstra <Lute.Kamstra@cwi.nl>
* cus-edit.el (custom-get-fresh-buffer): Test for nonexistence
buffer.
2003-06-03 Richard M. Stallman <rms@gnu.org>
 
* emacs-lisp/lisp-mode.el (eval-last-sexp-1):
......
......@@ -1214,7 +1214,7 @@ not for everybody."
;; To be more complete, we should also kill all permanent-local variables,
;; but it's not needed for custom.
(let ((buf (get-buffer name)))
(when (buffer-local-value 'buffer-file-name buf)
(when (and buf (buffer-local-value 'buffer-file-name buf))
;; This will check if the file is not saved.
(kill-buffer buf)
(setq buf nil))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment