[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: mail-extract-address-components with "Ver Surname, Given"
From: |
Richard Stallman |
Subject: |
Re: mail-extract-address-components with "Ver Surname, Given" |
Date: |
Fri, 17 Jun 2005 22:21:19 -0400 |
This change fixes it. What I am not sure is whether the
criterion is now too general so that it would give bad results
in some other case.
*** mail-extr.el 10 Feb 2005 01:13:43 -0500 1.47
--- mail-extr.el 17 Jun 2005 20:03:46 -0400
***************
*** 1594,1600 ****
;; Check for initial last name followed by comma
((and (eq ?, (following-char))
! (eq word-count 1))
(forward-char 1)
(setq last-name-comma-flag t)
(or (eq ?\ (following-char))
--- 1594,1605 ----
;; Check for initial last name followed by comma
((and (eq ?, (following-char))
! (not last-name-comma-flag))
! ;; This used to check for (eq word-count 1),
! ;; but that failed for the case
! ;; (mail-extract-address-components
! ;; "\"Ver Surname, Given\" <given.ver.surname@example.com>")
! ;; However, not checking at all may make this too general.
(forward-char 1)
(setq last-name-comma-flag t)
(or (eq ?\ (following-char))