* wl-util.el (wl-collect-summary): Use `eq' instead of `equal' for symbol.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index b9c9fb7..9ccbd73 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -5,6 +5,9 @@
        * wl-action.el (wl-summary-auto-refile): Use `goto-char' instead
        of `goto-line'.
 
+       * wl-util.el (wl-collect-summary): Use `eq' instead of `equal' for
+       symbol.
+
 2009-12-16  Lloyd Zusman <ljz@asfast.com>
 
        * wl-summary.el (wl-summary-detect-mark-position): Force

diff --git a/wl/wl-util.el b/wl/wl-util.el
index 3fdf251..d5288a0 100644 (file)
--- a/wl/wl-util.el
+++ b/wl/wl-util.el
@@ -521,7 +521,7 @@ that `read' can handle, whenever this is possible."
                                        (buffer-name x))
                          (save-excursion
                            (set-buffer x)
-                           (equal major-mode 'wl-summary-mode)))
+                           (eq major-mode 'wl-summary-mode)))
                     (setq result (nconc result (list x))))))
      (buffer-list))
     result))