* lisp/iswitchb.el (iswitchb-window-buffer-p): Use `member' instead of `memq'.

Fixes: debbugs:8799

2 files changed, 8 insertions, 4 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 101384cee7d..81de3b4b0f1 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-06-04  Deniz Dogan  <deniz@dogan.se>
+
+        * iswitchb.el (iswitchb-window-buffer-p): Use `member' instead of
+        `memq' (Bug#8799).
+
 2011-06-02  Stefan Monnier  <monnier@iro.umontreal.ca>
 
         * subr.el (make-progress-reporter): Add "..." by default (bug#8785).
diff --git a/lisp/iswitchb.el b/lisp/iswitchb.el
index e0da2563c1a..c782295c794 100644
--- a/lisp/iswitchb.el
+++ b/lisp/iswitchb.el
@@ -1118,10 +1118,9 @@ Return the modified list with the last element prepended to it."
 If BUFFER is visible in the current frame, return nil."
   (interactive)
   (let ((blist (iswitchb-get-buffers-in-frames 'current)))
-    ;;If the buffer is visible in current frame, return nil
-    (if (memq buffer blist)
-        nil
-      ;;  maybe in other frame or icon
+    ;; If the buffer is visible in current frame, return nil
+    (when (member buffer blist)
+      ;; maybe in other frame or icon
       (get-buffer-window buffer 0) ; better than 'visible
       )))