diff options
| author | Martin Rudalics | 2011-09-22 08:56:19 +0200 |
|---|---|---|
| committer | Martin Rudalics | 2011-09-22 08:56:19 +0200 |
| commit | b4d72fcf7872e16a6cfd20e0ef42b64d8690f7f6 (patch) | |
| tree | d2f3d2b1e596a695f414e7ef76141d002302f73d | |
| parent | 58ea99d174b7def04b7c9cd6f9ee89df1ca260ce (diff) | |
| download | emacs-b4d72fcf7872e16a6cfd20e0ef42b64d8690f7f6.tar.gz emacs-b4d72fcf7872e16a6cfd20e0ef42b64d8690f7f6.zip | |
Undedicate window when quitting should switch to previous buffer.
* window.el (quit-window): Undedicate window when switching to
previous buffer. Reported by Thierry Volpiatto
<thierry.volpiatto@gmail.com>.
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/window.el | 2 |
2 files changed, 8 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0db6356426e..3534cf36bf3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,9 @@ | |||
| 1 | 2011-09-22 Martin Rudalics <rudalics@gmx.at> | ||
| 2 | |||
| 3 | * window.el (quit-window): Undedicate window when switching to | ||
| 4 | previous buffer. Reported by Thierry Volpiatto | ||
| 5 | <thierry.volpiatto@gmail.com>. | ||
| 6 | |||
| 1 | 2011-09-21 Michael Albinus <michael.albinus@gmx.de> | 7 | 2011-09-21 Michael Albinus <michael.albinus@gmx.de> |
| 2 | 8 | ||
| 3 | * net/tramp.el (tramp-handle-shell-command): Set process sentinel | 9 | * net/tramp.el (tramp-handle-shell-command): Set process sentinel |
diff --git a/lisp/window.el b/lisp/window.el index ffbe710593e..21d02f76042 100644 --- a/lisp/window.el +++ b/lisp/window.el | |||
| @@ -2937,6 +2937,8 @@ one. If non-nil, reset `quit-restore' parameter to nil." | |||
| 2937 | ;; Show some other buffer in WINDOW and reset the quit-restore | 2937 | ;; Show some other buffer in WINDOW and reset the quit-restore |
| 2938 | ;; parameter. | 2938 | ;; parameter. |
| 2939 | (set-window-parameter window 'quit-restore nil) | 2939 | (set-window-parameter window 'quit-restore nil) |
| 2940 | ;; Make sure that WINDOW is no more dedicated. | ||
| 2941 | (set-window-dedicated-p window nil) | ||
| 2940 | (switch-to-prev-buffer window 'bury-or-kill))) | 2942 | (switch-to-prev-buffer window 'bury-or-kill))) |
| 2941 | 2943 | ||
| 2942 | ;; Kill WINDOW's old-buffer if requested | 2944 | ;; Kill WINDOW's old-buffer if requested |