X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=wl%2Fwl-highlight.el;h=9cbfd2193fed860a1e122dcb97517628b76c0981;hb=709366cf00291239e4287abb0b2105ad47fdbf59;hp=4391cf5e5691515d601a492dd05acb1c118a3a34;hpb=6239294a00385f89d5fe1be871dc9d13f07741ff;p=elisp%2Fwanderlust.git

diff --git a/wl/wl-highlight.el b/wl/wl-highlight.el
index 4391cf5..9cbfd21 100644
--- a/wl/wl-highlight.el
+++ b/wl/wl-highlight.el
@@ -777,14 +777,14 @@
 (defun wl-highlight-summary-line-string (line mark temp-mark indent)
   (let (fsymbol)
     (cond ((and (string= temp-mark "+")
-		(member mark (list wl-summary-unread-cached-mark
-				   wl-summary-unread-uncached-mark
-				   wl-summary-new-mark)))
+		(member mark (list elmo-msgdb-unread-cached-mark
+				   elmo-msgdb-unread-uncached-mark
+				   elmo-msgdb-new-mark)))
 	   (setq fsymbol 'wl-highlight-summary-high-unread-face))
 	  ((and (string= temp-mark "-")
-		(member mark (list wl-summary-unread-cached-mark
-				   wl-summary-unread-uncached-mark
-				   wl-summary-new-mark)))
+		(member mark (list elmo-msgdb-unread-cached-mark
+				   elmo-msgdb-unread-uncached-mark
+				   elmo-msgdb-new-mark)))
 	   (setq fsymbol 'wl-highlight-summary-low-unread-face))
 	  ((string= temp-mark "o")
 	   (setq fsymbol 'wl-highlight-summary-refiled-face))
@@ -794,12 +794,12 @@
 	   (setq fsymbol 'wl-highlight-summary-deleted-face))
 	  ((string= temp-mark "*")
 	   (setq fsymbol 'wl-highlight-summary-temp-face))
-	  ((string= mark wl-summary-new-mark)
+	  ((string= mark elmo-msgdb-new-mark)
 	   (setq fsymbol 'wl-highlight-summary-new-face))
-	  ((member mark (list wl-summary-unread-cached-mark
-			      wl-summary-unread-uncached-mark))
+	  ((member mark (list elmo-msgdb-unread-cached-mark
+			      elmo-msgdb-unread-uncached-mark))
 	   (setq fsymbol 'wl-highlight-summary-unread-face))
-	  ((or (string= mark wl-summary-important-mark))
+	  ((or (string= mark elmo-msgdb-important-mark))
 	   (setq fsymbol 'wl-highlight-summary-important-face))
 	  ((string= temp-mark "-")
 	   (setq fsymbol 'wl-highlight-summary-low-read-face))
@@ -842,21 +842,21 @@
       (if (not fsymbol)
 	  (cond
 	   ((and (string= temp-mark "+")
-		 (member status-mark (list wl-summary-unread-cached-mark
-					   wl-summary-unread-uncached-mark
-					   wl-summary-new-mark)))
+		 (member status-mark (list elmo-msgdb-unread-cached-mark
+					   elmo-msgdb-unread-uncached-mark
+					   elmo-msgdb-new-mark)))
 	    (setq fsymbol 'wl-highlight-summary-high-unread-face))
 	   ((and (string= temp-mark "-")
-		 (member status-mark (list wl-summary-unread-cached-mark
-					   wl-summary-unread-uncached-mark
-					   wl-summary-new-mark)))
+		 (member status-mark (list elmo-msgdb-unread-cached-mark
+					   elmo-msgdb-unread-uncached-mark
+					   elmo-msgdb-new-mark)))
 	    (setq fsymbol 'wl-highlight-summary-low-unread-face))
-	   ((string= status-mark wl-summary-new-mark)
+	   ((string= status-mark elmo-msgdb-new-mark)
 	    (setq fsymbol 'wl-highlight-summary-new-face))
-	   ((member status-mark (list wl-summary-unread-cached-mark
-				      wl-summary-unread-uncached-mark))
+	   ((member status-mark (list elmo-msgdb-unread-cached-mark
+				      elmo-msgdb-unread-uncached-mark))
 	    (setq fsymbol 'wl-highlight-summary-unread-face))
-	   ((string= status-mark wl-summary-important-mark)
+	   ((string= status-mark elmo-msgdb-important-mark)
 	    (setq fsymbol 'wl-highlight-summary-important-face))
 	   ;; score mark
 	   ((string= temp-mark "-")