From 2f348ca38c7dae2e987875b2f02bd801608755df Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 26 Jan 1998 03:09:01 +0000 Subject: [PATCH] (desktop-clear): Don't kill dead buffers. --- lisp/desktop.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/desktop.el b/lisp/desktop.el index e2a90dd9e40..b31f17353da 100644 --- a/lisp/desktop.el +++ b/lisp/desktop.el @@ -258,6 +258,7 @@ and those listed in `desktop-clear-preserve-buffers'." (let ((buffers (buffer-list))) (while buffers (or (member (buffer-name (car buffers)) desktop-clear-preserve-buffers) + (null (buffer-name (car buffers))) ;; Don't kill buffers made for internal purposes. (and (not (equal (buffer-name (car buffers)) "")) (eq (aref (buffer-name (car buffers)) 0) ?\ )) -- 2.39.2