* wl-address.el (wl-complete-field-body): Complete if the last

character is a space.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index b9e02f4..134f10b 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2004-01-28  Yuuichi Teranishi  <teranisi@gohome.org>
+
+       * wl-address.el (wl-complete-field-body): Complete if the last
+       character is a space.
+
 2004-01-28  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
        * wl-folder.el (wl-folder-clear-entity-info): Use

diff --git a/wl/wl-address.el b/wl/wl-address.el
index 2d8e3e7..dc62579 100644 (file)
--- a/wl/wl-address.el
+++ b/wl/wl-address.el
@@ -454,7 +454,8 @@ Matched address lists are append to CL."
             (message "Sole completion"))
            ((and epand-char
                  (> len 0)
-                 (char-equal (aref pattern (1- len)) epand-char)
+                 (or (char-equal (aref pattern (1- len)) epand-char)
+                     (char-equal (aref pattern (1- len)) ?\ ))
                  (assoc (substring pattern 0 (1- len)) cl))
             (wl-complete-insert
              start end