From 91abfd72b0a08cd68534ad7cf4f925883b3ebdf6 Mon Sep 17 00:00:00 2001 From: kaoru Date: Fri, 1 Jan 2010 08:05:04 +0000 Subject: [PATCH] * wl-util.el (wl-collect-summary): Use `eq' instead of `equal' for symbol. --- wl/ChangeLog | 3 +++ wl/wl-util.el | 2 +- 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index b9c9fb7..9ccbd73 100644 --- 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 * 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 --- 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)) -- 1.7.10.4