* mail-extract-address-components with "Ver Surname, Given"
@ 2005-06-16 18:05 Kevin Rodgers
2005-06-16 18:57 ` Kevin Rodgers
2005-06-18 2:21 ` Richard Stallman
0 siblings, 2 replies; 3+ messages in thread
From: Kevin Rodgers @ 2005-06-16 18:05 UTC (permalink / raw)
(mail-extract-address-components
"\"Surname, Given\" <given.surname@example.com>")
correctly returns:
("Given Surname" "given.surname@example.com")
But:
(mail-extract-address-components
"\"Ver Surname, Given\" <given.ver.surname@example.com>")
returns:
("Ver Surname" "given.ver.surname@example.com")
instead of:
("Given Ver Surname" "given.ver.surname@example.com")
--
Kevin Rodgers
^ permalink raw reply [flat|nested] 3+ messages in thread
* Re: mail-extract-address-components with "Ver Surname, Given"
2005-06-16 18:05 mail-extract-address-components with "Ver Surname, Given" Kevin Rodgers
@ 2005-06-16 18:57 ` Kevin Rodgers
2005-06-18 2:21 ` Richard Stallman
1 sibling, 0 replies; 3+ messages in thread
From: Kevin Rodgers @ 2005-06-16 18:57 UTC (permalink / raw)
Similarly:
(mail-extract-address-components
"\"Howell III, Thurston\" <thurston.howell.3rd@gilligans.is>")
returns:
("Howell III" "thurston.howell.3rd@gilligans.is")
instead of:
("Thurston Howell III" "thurston.howell.3rd@gilligans.is")
--
Kevin Rodgers
^ permalink raw reply [flat|nested] 3+ messages in thread
* Re: mail-extract-address-components with "Ver Surname, Given"
2005-06-16 18:05 mail-extract-address-components with "Ver Surname, Given" Kevin Rodgers
2005-06-16 18:57 ` Kevin Rodgers
@ 2005-06-18 2:21 ` Richard Stallman
1 sibling, 0 replies; 3+ messages in thread
From: Richard Stallman @ 2005-06-18 2:21 UTC (permalink / raw)
Cc: bug-gnu-emacs
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))
^ permalink raw reply [flat|nested] 3+ messages in thread
end of thread, other threads:[~2005-06-18 2:21 UTC | newest]
Thread overview: 3+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2005-06-16 18:05 mail-extract-address-components with "Ver Surname, Given" Kevin Rodgers
2005-06-16 18:57 ` Kevin Rodgers
2005-06-18 2:21 ` Richard Stallman
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).