diff options
| author | Richard M. Stallman <rms@gnu.org> | 1998-01-26 03:09:01 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1998-01-26 03:09:01 +0000 |
| commit | 2f348ca38c7dae2e987875b2f02bd801608755df (patch) | |
| tree | 7fe8b0e6994b8cf9e7242cc9ccfc9d2224ecedbe /lisp/desktop.el | |
| parent | cef926f31852ed1f17079e6f5f35651fd064aa31 (diff) | |
| download | emacs-2f348ca38c7dae2e987875b2f02bd801608755df.tar.gz | |
(desktop-clear): Don't kill dead buffers.
Diffstat (limited to 'lisp/desktop.el')
| -rw-r--r-- | lisp/desktop.el | 1 |
1 files changed, 1 insertions, 0 deletions
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) ?\ )) |