mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-27 16:51:06 -07:00
Code Issues Projects Releases Wiki Activity

(server-switch-buffer): Only switch window if the current one is dedicated.

Browse source
This commit is contained in:
Stefan Monnier 2001-02-22 20:14:45 +00:00
parent cb91b2c7ee
commit 39b557e891
2 changed files with 6 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/ChangeLog
View file

@ -1,5 +1,8 @@
2001-02-22 Stefan Monnier <monnier@cs.yale.edu>
* server.el (server-switch-buffer): Only switch window if the
current one is dedicated.
* textmodes/fill.el (fill-region-as-paragraph): Skip spaces backward
rather than using (match-beginning 0) when searching for break point.

5
lisp/server.el
View file

@ -507,8 +507,9 @@ Arg NEXT-BUFFER is a suggestion; if it is a live buffer, use it."
(if (window-minibuffer-p (selected-window))
(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 'visible (selected-window)))
(when (window-dedicated-p (selected-window))
(select-window (some-window (lambda (w) (not (window-dedicated-p w)))
'nomini 'visible (selected-window))))
(set-window-dedicated-p (selected-window) nil)
(if next-buffer
(if (and (bufferp next-buffer)