X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=wl%2Fwl-mule.el;h=7dc9f6eac7f19d9843187f28e65b7f523e6bd773;hb=709366cf00291239e4287abb0b2105ad47fdbf59;hp=70384529392beeb2c9c8d4adc1115b533ccf7f23;hpb=edafeb2a79066c28d008382473ff92bb78b4c54e;p=elisp%2Fwanderlust.git

diff --git a/wl/wl-mule.el b/wl/wl-mule.el
index 7038452..7dc9f6e 100644
--- a/wl/wl-mule.el
+++ b/wl/wl-mule.el
@@ -112,7 +112,7 @@ Special commands:
 
 (defun wl-message-wheel-up (event)
   (interactive "e")
-  (if (string-match (regexp-quote wl-message-buffer-cache-name)
+  (if (string-match (regexp-quote wl-message-buffer-name)
 		    (regexp-quote (buffer-name)))
       (wl-message-next-page)
     (let ((cur-buf (current-buffer))
@@ -128,7 +128,7 @@ Special commands:
 
 (defun wl-message-wheel-down (event)
   (interactive "e")
-  (if (string-match (regexp-quote wl-message-buffer-cache-name)
+  (if (string-match (regexp-quote wl-message-buffer-name)
 		    (regexp-quote (buffer-name)))
       (wl-message-prev-page)
     (let ((cur-buf (current-buffer))