separators to commas
(defun my-bbdb-after-read-db-hook ()
(mapcar
(function
(lambda (fieldname)
(put (intern (car fieldname)) 'field-separator ", ")))
(bbdb-propnames))
nil)
(add-hook 'bbdb-after-read-db-hook 'my-bbdb-after-read-db-hook)
buted the code to solve the easy bit of the problem
(calling a user-defined elisp function on the message to generate
field contents). I posted it to info-bbdb a couple of months ago as
two patches to BBDB 1.48.
Message-Id: <[EMAIL PROTECTED]>
From: [EMAIL PROTECTED] (Rod
t;[EMAIL PROTECTED]>
From: [EMAIL PROTECTED] (Rod Whitby)
To: Joe Wells <[EMAIL PROTECTED]>, Jamie Zawinski <[EMAIL PROTECTED]>
Cc: BBDB Mailing List <[EMAIL PROTECTED]>
Subject: Re: Patch to bbdb-hooks.el to allow the use of pseudo-headers.
Dat
+ string ; A function as STRING may return nil
(not (and notes
;; check that STRING is not already
;; present in the NOTES field
===
--
mie> I think this is a bad idea. Lots of people forward
Jamie> messages such that their headers look like this:
Jamie> From: Jamie Zawinski <[EMAIL PROTECTED]>
Jamie> To: [EMAIL PROTECTED] (Rod Whitby)
Jamie> Subject: fwd
Jamie> From:
ckage, available
with FSF19 or from /ftp.cs.buffalo.edu:/pub/Emacs/ - a most excellent
package IMHO. It should included with the next version of Lucid Emacs
- hint, hint.]
;;; $Id: bbdb-defaults.el,v 1.6 1993/06/25 00:03:30 rwhitby Exp $
;;; $File: ~/elib/defaults/bbdb-defaults.el $
;;;
d expanded version of STRING here:
(if (and did-match
(not (and notes
--
- _--_|\ |
Rod Whitby ([EMAIL PROTECTED])/ \ |
Canon Information Systems Research Australia \_.--._/ |
1 Thomas Holt Drive, North Ryde, N.S.W., 2113. v |
