* wl-address.el (wl-complete-field-body): Bind `completion-ignore-case'

as t for `try-completion'.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 122ed2d..39a790d 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2002-05-16  Yuuichi Teranishi  <teranisi@gohome.org>
+
+       * wl-address.el (wl-complete-field-body): Bind `completion-ignore-case'
+       as t for `try-completion'.
+
 2002-05-15  Yuuichi Teranishi  <teranisi@gohome.org>
 
        * wl-summary.el (wl-summary-default-from): Use

diff --git a/wl/wl-address.el b/wl/wl-address.el
index d936011..56a92ab 100644 (file)
--- a/wl/wl-address.el
+++ b/wl/wl-address.el
@@ -431,6 +431,7 @@ Matched address lists are append to CL."
         (completion)
         (pattern (buffer-substring start end))
         (len (length pattern))
+        (completion-ignore-case t)
         (cl completion-list))
     (when use-ldap
       (setq cl (wl-address-ldap-search pattern cl)))