Re: [Bug-mit-scheme] imail issues with quoted human names

[Chris Hanson]

On Thu, Aug 28, 2008 at 9:24 AM, Julie Sussman <address@hidden> wrote:

>   (define-mail-alias "myself"
>     '("\"Julie E. M. Sussman\" <address@hidden>"))
>
> Actually, individual aliases like the one above are not a problem
> for me.  I don't really need them.  However, I *DO* make extensive
> use of lists that I keep in my .mailrc, especially divizheni.active,
> which currently looks like this, and which I use this frequently
> for official e-mail to my chorus.  I can't reasonably work
> around that with a definie-mail-alias command like the one above.
> It's way too unwieldy.

How about this?

(define-mail-alias "divizheni.active"
  (map (lambda (entry)
         (string-append "\"" (car entry) "\" <" (cadr entry) ">"))
       '(("Tatiana Sarbinska" "address@hidden")
         ("Bonnie Armstrong" "address@hidden")
         ("Freedom Baird" "address@hidden")
         ("Suzanne Costanza" "address@hidden")
         ("Barbara Gottfried" "address@hidden")
         ("Priscilla Howell" "address@hidden")
         ("Kate Jellinghaus" "address@hidden")
         ("Liz Levin" "address@hidden")
         ("Cathie ONeill" "address@hidden")
         ("Barbara Pixton" "address@hidden")
         ("Julia Poirier" "address@hidden")
         ("Paula Rosenstock" "address@hidden")
         ("Leilani Roser" "address@hidden")
         ("Dori Smith" "address@hidden")
         ("Anna Stevens" "address@hidden")
         ("Debra Strick" "address@hidden")
         ("Julie Sussman" "address@hidden")
         ("Vera Anastasoaie" "address@hidden")
         ("Elaine Winic" "address@hidden")
         ("Mari Young" "address@hidden")
         ("Jane Culbert" "address@hidden")
         ("Kim Keown" "address@hidden")
         ("Beate Gottschlich" "address@hidden")
         ("Sarah M. Walsh" "address@hidden"))))