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

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d700b6bda54..9838d002a29 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+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):
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 51e4e5b1f3a..090503e67e7 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -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))