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 <>
* cus-edit.el (custom-get-fresh-buffer): Test for nonexistence
2003-06-03 Richard M. Stallman <>
* 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