From: yoichi <yoichi>
Date: Sun, 1 Oct 2006 13:12:18 +0000 (+0000)
Subject: * elmo.el: Fix typo: disptch -> dispatch.
X-Git-Tag: wl-2_15_5~4
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=cd7d0683126e91eeb58f4035f8d7d02f36be03d7;p=elisp%2Fwanderlust.git

* elmo.el: Fix typo: disptch -> dispatch.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 7698b5c..dae999d 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,7 @@
+2006-10-01  Yoichi NAKAYAMA  <yoichi@geiin.org>
+
+	* elmo.el: Fix typo: disptch -> dispatch.
+
 2006-10-01  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
 	* elmo.el (elmo-file-tag): New class.
diff --git a/elmo/elmo.el b/elmo/elmo.el
index e52ae66..da05529 100644
--- a/elmo/elmo.el
+++ b/elmo/elmo.el
@@ -1069,7 +1069,7 @@ If optional argument IF-EXISTS is nil, load on demand.
 (eval-and-compile
   (luna-define-class elmo-file-tag))
 
-(defconst elmo-append-messages-disptch-table
+(defconst elmo-append-messages-dispatch-table
   '(((nil	. null)		. elmo-folder-append-messages-*-null)
     ((filter	. nil)		. elmo-folder-append-messages-filter-*)
     ((nil	. filter)	. elmo-folder-append-messages-*-filter)
@@ -1113,9 +1113,9 @@ If second optional argument SAME-NUMBER is specified,
 message number is preserved \(if possible\).
 Returns a list of message numbers successfully appended."
   (let ((rest (if caller
-		  (cdr (memq (rassq caller elmo-append-messages-disptch-table)
-			     elmo-append-messages-disptch-table))
-		elmo-append-messages-disptch-table))
+		  (cdr (memq (rassq caller elmo-append-messages-dispatch-table)
+			     elmo-append-messages-dispatch-table))
+		elmo-append-messages-dispatch-table))
 	result)
     (while rest
       (let ((types (car (car rest))))