From b8c51c174a5b84beb58979cd3e7e6b308b1a8170 Mon Sep 17 00:00:00 2001 From: teranisi Date: Wed, 28 Jan 2004 13:34:14 +0000 Subject: [PATCH] * wl-address.el (wl-complete-field-body): Complete if the last character is a space. --- wl/ChangeLog | 5 +++++ wl/wl-address.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index b9e02f4..134f10b 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2004-01-28 Yuuichi Teranishi + + * wl-address.el (wl-complete-field-body): Complete if the last + character is a space. + 2004-01-28 Hiroya Murata * 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 --- 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 -- 1.7.10.4