From 60b4b29868b65a17da34328f69947727264cfc31 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Mon, 11 Jun 2007 00:23:06 +0000 Subject: [PATCH] (server-switch-buffer): Remove redundant check. --- lisp/ChangeLog | 8 ++++++-- lisp/server.el | 3 +-- 2 files changed, 7 insertions(+), 4 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c0b00b8fbb1..7ab55f730a3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,7 +1,11 @@ +2007-06-11 Juanma Barranquero + + * server.el (server-switch-buffer): Remove redundant check. + 2007-06-10 Martin Rudalics - * emacs-lisp/bytecomp.el (byte-compile-find-cl-functions): Match - against file-name-nondirectory. + * emacs-lisp/bytecomp.el (byte-compile-find-cl-functions): + Match against file-name-nondirectory. Fix text on user customization variables. Reported by Johan Bockg,Ae(Brd . diff --git a/lisp/server.el b/lisp/server.el index 690f51034f2..2cf2a2e3953 100644 --- a/lisp/server.el +++ b/lisp/server.el @@ -735,8 +735,7 @@ Arg NEXT-BUFFER is a suggestion; if it is a live buffer, use it." (select-window win) (set-buffer next-buffer)) ;; Otherwise, let's find an appropriate window. - (cond ((and (windowp server-window) - (window-live-p server-window)) + (cond ((window-live-p server-window) (select-window server-window)) ((framep server-window) (unless (frame-live-p server-window) -- 2.39.2