diff options
| author | Ivan Shmakov | 2014-09-09 20:47:20 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2014-09-09 20:47:20 -0400 |
| commit | 2776a6502b211c45e6b4e65549436d2d8527b6f3 (patch) | |
| tree | a61eb9205bf0a9666c26e43dd1232f7175b37317 | |
| parent | 7c2aaeb4f6ee5c209283ab0c6bdf3f0918f3de98 (diff) | |
| download | emacs-2776a6502b211c45e6b4e65549436d2d8527b6f3.tar.gz emacs-2776a6502b211c45e6b4e65549436d2d8527b6f3.zip | |
* lisp/desktop.el (desktop-create-buffer): Check that buffers are still live
before burying them.
Fixes: debbugs:18373
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/desktop.el | 4 |
2 files changed, 8 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7018d3c8abb..46cb4ba0d68 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2014-09-10 Ivan Shmakov <ivan@siamics.net> (tiny change) | ||
| 2 | |||
| 3 | * desktop.el (desktop-create-buffer): Check that buffers are still live | ||
| 4 | before burying them (bug#18373). | ||
| 5 | |||
| 1 | 2014-09-09 Glenn Morris <rgm@gnu.org> | 6 | 2014-09-09 Glenn Morris <rgm@gnu.org> |
| 2 | 7 | ||
| 3 | * calendar/diary-lib.el (diary-list-entries): | 8 | * calendar/diary-lib.el (diary-list-entries): |
diff --git a/lisp/desktop.el b/lisp/desktop.el index 40e6b364e45..360ff48339b 100644 --- a/lisp/desktop.el +++ b/lisp/desktop.el | |||
| @@ -1375,7 +1375,9 @@ after that many seconds of idle time." | |||
| 1375 | ;; Restore buffer list order with new buffer at end. Don't change | 1375 | ;; Restore buffer list order with new buffer at end. Don't change |
| 1376 | ;; the order for old desktop files (old desktop module behavior). | 1376 | ;; the order for old desktop files (old desktop module behavior). |
| 1377 | (unless (< desktop-file-version 206) | 1377 | (unless (< desktop-file-version 206) |
| 1378 | (mapc 'bury-buffer buffer-list) | 1378 | (dolist (buf buffer-list) |
| 1379 | (and (buffer-live-p buf) | ||
| 1380 | (bury-buffer buf))) | ||
| 1379 | (when result (bury-buffer result))) | 1381 | (when result (bury-buffer result))) |
| 1380 | (when result | 1382 | (when result |
| 1381 | (unless (or desktop-first-buffer (< desktop-file-version 206)) | 1383 | (unless (or desktop-first-buffer (< desktop-file-version 206)) |