(server-switch-buffer): Remove redundant check.
This commit is contained in:
parent
843d24582c
commit
60b4b29868
2 changed files with 7 additions and 4 deletions
|
@ -1,7 +1,11 @@
|
||||||
|
2007-06-11 Juanma Barranquero <lekktu@gmail.com>
|
||||||
|
|
||||||
|
* server.el (server-switch-buffer): Remove redundant check.
|
||||||
|
|
||||||
2007-06-10 Martin Rudalics <rudalics@gmx.at>
|
2007-06-10 Martin Rudalics <rudalics@gmx.at>
|
||||||
|
|
||||||
* emacs-lisp/bytecomp.el (byte-compile-find-cl-functions): Match
|
* emacs-lisp/bytecomp.el (byte-compile-find-cl-functions):
|
||||||
against file-name-nondirectory.
|
Match against file-name-nondirectory.
|
||||||
Fix text on user customization variables.
|
Fix text on user customization variables.
|
||||||
Reported by Johan Bockg,Ae(Brd <bojohan@dd.chalmers.se>.
|
Reported by Johan Bockg,Ae(Brd <bojohan@dd.chalmers.se>.
|
||||||
|
|
||||||
|
|
|
@ -735,8 +735,7 @@ Arg NEXT-BUFFER is a suggestion; if it is a live buffer, use it."
|
||||||
(select-window win)
|
(select-window win)
|
||||||
(set-buffer next-buffer))
|
(set-buffer next-buffer))
|
||||||
;; Otherwise, let's find an appropriate window.
|
;; Otherwise, let's find an appropriate window.
|
||||||
(cond ((and (windowp server-window)
|
(cond ((window-live-p server-window)
|
||||||
(window-live-p server-window))
|
|
||||||
(select-window server-window))
|
(select-window server-window))
|
||||||
((framep server-window)
|
((framep server-window)
|
||||||
(unless (frame-live-p server-window)
|
(unless (frame-live-p server-window)
|
||||||
|
|
Loading…
Add table
Reference in a new issue