From: Robert Fenk <[EMAIL PROTECTED]>
   Date: Wed, 2 Jan 2002 13:30:59 +0100
   
   On Wednesday, January 2, 2002 at 17:41:14, Steve Youngs wrote:
   > Hey Folks!
   > 
   > I finally got sick of BBDB not noticing things in hidden headers (like
   > X-Face's), so I wrote this horrible little hack:
   [...]
   > The downside is that, OMG it's so slow. :-(  Does anyone have a better way
   > to do this?
   
   Try this, which is taken and adapted from the stuff I once
   did for bbdb/gnus-* 
   
   (defun rf-bbdb-gnus-auto-notes-hook (record)
     (save-excursion
       (set-buffer (get-buffer gnus-article-buffer))
       (set-buffer gnus-original-article-buffer)
       (goto-char (point-min))
       (bbdb-auto-notes-hook record)))
   

Just curious, but how is this different from doing something like:

 (setq bbdb-auto-notes-alist nil)
 (add-to-list 'bbdb-auto-notes-alist '("Organization" (".*" company 0 t)))
 ;;   Here's a more complicated example: some people include bitmaps of
 ;;themselves in their mail messages in an X-Face: header field.  You can
 ;;capture this field into the `*BBDB*' with the following:
 (add-to-list 'bbdb-auto-notes-alist
               (list "X-Face"
                     (list (concat "[ \t\n]*\\([^ \t\n]*\\)" "\\([ \t\n]+\\([^ 
\t\n]+\\)\\)?"
                               "\\([ \t\n]+\\([^ \t\n]+\\)\\)?" "\\([ \t\n]+\\([^ 
\t\n]+\\)\\)?")
                           'face
                           "\\1\\3\\5\\7")))
 
 (add-hook 'bbdb-notice-hook 'bbdb-auto-notes-hook)


??

-jeff

_______________________________________________
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/bbdb-info
BBDB Home Page: http://bbdb.sourceforge.net/

Reply via email to