diff options
Diffstat (limited to 'lisp/mail/mail-extr.el')
| -rw-r--r-- | lisp/mail/mail-extr.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/mail-extr.el b/lisp/mail/mail-extr.el index 94a95cd54e5..209b1deacf8 100644 --- a/lisp/mail/mail-extr.el +++ b/lisp/mail/mail-extr.el @@ -876,14 +876,14 @@ consing a string.)" ;; Do `(forward-word 1)', recognizing non-ASCII characters ;; except Latin-1 nbsp as words. (while (progn - (skip-chars-forward "^\000-\177 ") + (skip-chars-forward "^\000-\177 ") (and (not (eobp)) (eq ?w (char-syntax (char-after))) (progn (forward-word 1) (and (not (eobp)) (> (char-after) ?\177) - (not (eq (char-after) ? ))))))))) + (not (eq (char-after) ? ))))))))) (or (eq char ?\() ;; At the end of first address of a multiple address header. (and (eq char ?,) |