mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-26 07:33:47 +00:00
Code Issues Releases Activity

(server-switch-buffer): Choose a window on a visible

Browse Source 
frame.
This commit is contained in:
Gerd Moellmann 2000-12-21 15:57:01 +00:00
parent 9ab436b9e0
commit 8363063ec7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/server.el
View File

@ -508,7 +508,7 @@ Arg NEXT-BUFFER is a suggestion; if it is a live buffer, use it."
(select-window (next-window nil 'nomini 0)))
;; Move to a non-dedicated window, if we have one.
(select-window (some-window (lambda (w) (not (window-dedicated-p w)))
'nomini 0 (selected-window)))
'nomini 'visible (selected-window)))
(set-window-dedicated-p (selected-window) nil)
(if next-buffer
(if (and (bufferp next-buffer)