From 61f5f91242d7b5a061e11ef4a1733bb19b88907a Mon Sep 17 00:00:00 2001 From: keiichi Date: Thu, 19 Aug 1999 04:09:41 +0000 Subject: [PATCH] (nnmail-split-it): Match whole word for getting group name with `\N'. --- lisp/nnmail.el | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) diff --git a/lisp/nnmail.el b/lisp/nnmail.el index 2a2d476..6c0fc78 100644 --- a/lisp/nnmail.el +++ b/lisp/nnmail.el @@ -1384,10 +1384,13 @@ See the documentation for the variable `nnmail-split-fancy' for documentation." ;; correct match positions. (goto-char (match-end 0)) (let ((value (nth 1 split))) - (re-search-backward (if (symbolp value) - (cdr (assq value nnmail-split-abbrev-alist)) - value) - (match-end 1))) + (re-search-backward + (concat "\\<" + (if (symbolp value) + (cdr (assq value nnmail-split-abbrev-alist)) + value) + "\\>") + (match-end 1))) (nnmail-split-it (nth 2 split)))) ;; Not in cache, compute a regexp for the field/value pair. -- 1.7.10.4