# HG changeset patch
# User Bill Wohler <wohler@newt.com>
# Date 1137514829 0
# Node ID 310a829d776fa4da9804d20b059d16b7cadefedb
# Parent  2b5c49f37c595fb483ac850b597ad7a97a16b0ba
(assoc-string): Fix typo in argument.

diff -r 2b5c49f37c59 -r 310a829d776f lisp/mh-e/ChangeLog
--- a/lisp/mh-e/ChangeLog	Tue Jan 17 14:32:16 2006 +0000
+++ b/lisp/mh-e/ChangeLog	Tue Jan 17 16:20:29 2006 +0000
@@ -1,3 +1,7 @@
+2006-01-17  Bill Wohler  <wohler@newt.com>
+
+	* mh-acros.el (assoc-string): Fix typo in argument.
+
 2006-01-16  Bill Wohler  <wohler@newt.com>
 
 	* mh-acros.el (require): Remove defadvice of require as defadvice
diff -r 2b5c49f37c59 -r 310a829d776f lisp/mh-e/mh-acros.el
--- a/lisp/mh-e/mh-acros.el	Tue Jan 17 14:32:16 2006 +0000
+++ b/lisp/mh-e/mh-acros.el	Tue Jan 17 16:20:29 2006 +0000
@@ -157,8 +157,8 @@
 This function added by MH-E for Emacs versions that lack
 `assoc-string', introduced in Emacs 22."
     (if case-fold
-        (assoc-ignore-case key alist)
-      (assoc key alist))))
+        (assoc-ignore-case key list)
+      (assoc key list))))
 
 (provide 'mh-acros)