diff options
| -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'." | |||
| 258 | (let ((buffers (buffer-list))) | 258 | (let ((buffers (buffer-list))) |
| 259 | (while buffers | 259 | (while buffers |
| 260 | (or (member (buffer-name (car buffers)) desktop-clear-preserve-buffers) | 260 | (or (member (buffer-name (car buffers)) desktop-clear-preserve-buffers) |
| 261 | (null (buffer-name (car buffers))) | ||
| 261 | ;; Don't kill buffers made for internal purposes. | 262 | ;; Don't kill buffers made for internal purposes. |
| 262 | (and (not (equal (buffer-name (car buffers)) "")) | 263 | (and (not (equal (buffer-name (car buffers)) "")) |
| 263 | (eq (aref (buffer-name (car buffers)) 0) ?\ )) | 264 | (eq (aref (buffer-name (car buffers)) 0) ?\ )) |