Hello,

I use:

/usr/local/emacs-21.3/src/emacs -q -l .emacs.d/.emacs-debug-bbdb-vm &

and bbdb refuses to automatically add new entries when I read mail
with vm.  This is a new problem, possibly since upgrading vm to 7.18?
works OK with rmail.

what am I doing wrong...??

Here is the .emacs-debug-bbdb-vm:

---------------------------------
(setq load-path (append (list (expand-file-name "~/.emacs.d/vm")) load-path))
(setq load-path (append (list (expand-file-name "~/.emacs.d/bbdb/lisp")) load-path))
(require 'bbdb)
(bbdb-initialize 'rmail 'message 'sendmail 'gnus 'vm)
(setq vm-spool-files '("pop:xx.xx.edu:110:pass:xx:*"))
(setq vm-primary-inbox "~/RMAIL")
(bbdb-insinuate-vm)
(setq vm-mutable-frames nil)
(setq bbdb/vm-update-records-mode 'annotating)
---------------------------------



VM version: 7.18.


Emacs  : GNU Emacs 21.3.2 (i686-pc-linux-gnu, X toolkit, Xaw3d scroll bars)
of 2003-10-22 on xx.xx.edu
Package: BBDB 2.35

current state:
==============
(setq
emacs-version "21.3.2"
bbdb-version-date "$Date: 2004/01/23 00:08:32 $"
bbdb-file-format 6
bbdb-no-duplicates-p nil
bbdb-address-editing-function 'bbdb-address-edit-default
bbdb-address-formatting-alist '((bbdb-address-is-continental .
bbdb-format-address-continental)
(nil . bbdb-format-address-default))
bbdb-addresses-label-list '("Home" "Office" "Mobile" "Other")
bbdb-after-change-hook nil
bbdb-after-read-db-hook nil
bbdb-always-add-addresses 'ask
bbdb-auto-revert-p nil
bbdb-canonicalize-net-hook nil
bbdb-canonicalize-redundant-nets-p t
bbdb-case-fold-search t
bbdb-change-hook 'bbdb-timestamp-hook
bbdb-check-zip-codes-p t
bbdb-complete-name-allow-cycling nil
bbdb-complete-name-hooks nil
bbdb-completion-display-record t
bbdb-completion-type nil
bbdb-continental-zip-regexp "^\\s *[A-Z][A-Z]?\\s *-\\s *[0-9][0-9][0-9]"
bbdb-create-hook 'bbdb-creation-date-hook
bbdb-default-area-code nil
bbdb-default-country "Emacs"
bbdb-default-domain nil
bbdb-default-label-list '("Home" "Office" "Mobile" "Other")
bbdb-define-all-aliases-field 'mail-alias
bbdb-define-all-aliases-mode 'first
bbdb-dial-local-prefix nil
bbdb-dial-local-prefix-alist '(((if (integerp bbdb-default-area-code)
(format "(%03d)" bbdb-default-area-code)
(or bbdb-default-area-code ""))
"")
)
bbdb-dial-long-distance-prefix nil
bbdb-display-layout 'multi-line
bbdb-display-layout-alist '((one-line (order phones mail-alias net notes)
(name-end . 24) (toggle . t))
(multi-line (omit creation-date timestamp)
(toggle . t))
(pop-up-multi-line) (full-multi-line))
bbdb-dwim-net-address-allow-redundancy nil
bbdb-electric-p nil
bbdb-expand-mail-aliases t
bbdb-extract-address-component-handler 'message
bbdb-extract-address-component-ignore-regexp "\\(\\(undisclosed\\|unlisted\\)[^,]*recipients\\)\\|no To-header on input"
bbdb-extract-address-component-regexps '(("\"\\([^\"]*\\)\"\\s-*<\\([^>]+\\)>"
(car


(mail-extract-address-components


(concat






"\""





(match-string 1 adstring)





"\"")


)


                                                                                 )
                                           2)
                                          ("\\([^<>, ][^<>,]+[^<>,       
]\\)\\s-*<\\([^>]+\\)>" 1 2)
                                          ("<\\([^>,]+\\)>" nil 1)
                                          ("\\(\\b[^<\",()]+\\b\\)\\s-*(\\([^)]+\\))"
                                           (car

(mail-extract-address-components


(concat






"\""





(match-string 2 adstring)





"\"")


)


                                                                                       
)
                                           1)
                                          ("\\b\\(\\([^@   \n.]+\\.[^@     \n.]+\\)@[^@    
\n]+\\)\\b"
                                           (car

(mail-extract-address-components


(concat






"\""





(match-string 2 adstring)





"\"")


)


)
1)
("\\b\\(\\([^@ \n]+\\)@[^@ \n]+\\)\\b" nil 1)
("\\b\\([^@ \n]+\\)\\b" nil 1))
bbdb-extract-address-components-func 'bbdb-rfc822-addresses
bbdb-file "~/.bbdb"
bbdb-file-remote nil
bbdb-file-remote-save-always t
bbdb-finger-buffer-name "*finger*"
bbdb-finger-host-field 'finger-host
bbdb-get-addresses-headers '((authors "From" "Resent-From" "Reply-To")
(recipients "Resent-To" "Resent-CC" "To" "CC"
"BCC")
)
bbdb-get-only-first-address-p t
bbdb-gui t
bbdb-hashtable-size 1021
bbdb-info-file nil
bbdb-initialize-hook nil
bbdb-lastname-prefixes '("von" "Von" "de" "De")
bbdb-legal-zip-codes '("^$"
"^[ \n]*[0-9][0-9]?[0-9]?[0-9]?[0-9]?[0-9]?[ \n]*$" "^[ \n]*\\([0-9][0-9][0-9][0-9][0-9]\\)[ \n]*-?[ \n]*\\([0-9][0-9][0-9][0-9]?\\)[ \n]*$" "^[ \n]*\\([A-Za-z0-9]+\\)[ \n]+\\([A-Za-z0-9]+\\)[ \n]*$" "^[ \n]*\\([A-Z]+\\)[ \n]*-?[ \n]*\\([0-9]+ ?[A-Z]*\\)[ \n]*$" "^[ \n]*\\([A-Z]+\\)[ \n]*-?[ \n]*\\([0-9]+\\)[ \n]+\\([0-9]+\\)[ \n]*$")
bbdb-list-hook nil
bbdb-load-hook nil
bbdb-message-caching-enabled t
bbdb-mode-hook nil
bbdb-modem-device "/dev/modem"
bbdb-modem-dial nil
bbdb-multiple-buffers nil
bbdb-new-nets-always-primary nil
bbdb-north-american-phone-numbers-p t
bbdb-notes-default-separator ", "
bbdb-notes-sort-order '((notes . 0) (www . 1) (ftp . 2) (gopher . 3)
(telnet . 4) (mail-alias . 5) (mail-folder . 6)
(lpr . 7) (creation-date . 1000) (timestamp . 1001))
bbdb-notice-auto-save-file nil
bbdb-notice-hook nil
bbdb-offer-save t
bbdb-phones-label-list '("Home" "Office" "Mobile" "Other")
bbdb-pop-up-display-layout 'pop-up-multi-line
bbdb-pop-up-target-lines 5
bbdb-quiet-about-name-mismatches nil
bbdb-readonly-p nil
bbdb-refile-notes-default-merge-function 'bbdb-refile-notes-default-merge-function
bbdb-refile-notes-generate-alist '((creation-date .
bbdb-refile-notes-string-least)
(timestamp . bbdb-refile-notes-string-most)
)
bbdb-save-db-timeout nil
bbdb-send-mail-style nil
bbdb-silent-running nil
bbdb-snarf-web-prop 'www
bbdb-sound-files ["/usr/demo/SOUND/sounds/touchtone.0.au" "/usr/demo/SOUND/sounds/touchtone.1.au" "/usr/demo/SOUND/sounds/touchtone.2.au" "/usr/demo/SOUND/sounds/touchtone.3.au" "/usr/demo/SOUND/sounds/touchtone.4.au" "/usr/demo/SOUND/sounds/touchtone.5.au" "/usr/demo/SOUND/sounds/touchtone.6.au" "/usr/demo/SOUND/sounds/touchtone.7.au" "/usr/demo/SOUND/sounds/touchtone.8.au" "/usr/demo/SOUND/sounds/touchtone.9.au" "/usr/demo/SOUND/sounds/touchtone.pound.au" "/usr/demo/SOUND/sounds/touchtone.star.au"]
bbdb-sound-player nil
bbdb-sound-volume 50
bbdb-time-display-format "%d %b %Y"
bbdb-update-records-mode 'annotating
bbdb-use-alternate-names t
bbdb-use-pop-up t
bbdb-user-mail-names nil
bbdb-write-file-hooks '(bbdb-write-file-hook-fn)
bbdb/mail-auto-create-p t
bbdb/news-auto-create-p nil
bbdb/vm-auto-add-label-field 'mail-alias
bbdb/vm-auto-add-label-list nil
bbdb/vm-set-auto-folder-alist-field 'vm-folder
bbdb/vm-set-auto-folder-alist-headers '("From:" "To:" "CC:")
bbdb/vm-update-records-mode 'annotating
features '(reporter bbdb-vm vm-vars vm-startup vm-version vm vm-autoload
bbdb-snarf mail-extr rfc822 bbdb-com mailabbrev sendmail cl cl-19
bbdb-autoloads bbdb timezone tooltip image tool-bar disp-table
fontset ediff-hook vc-hooks lisp-float-type lisp-mode page
menu-bar timer select scroll-bar mldrag mouse facemenu faces
cus-face frame ucs-tables misc-lang vietnamese tibetan thai lao
korean japanese hebrew greek romanian slovak czech european
ethiopic devanagari indian cyrillic chinese case-table help simple
overlay md5 base64 format mule env backquote custom widget
x-toolkit)
)


_________________________________________________________________
Store more e-mails with MSN Hotmail Extra Storage – 4 plans to choose from! http://click.atdmt.com/AVE/go/onm00200362ave/direct/01/




-------------------------------------------------------
This SF.Net email is sponsored by: IBM Linux Tutorials
Free Linux tutorial presented by Daniel Robbins, President and CEO of
GenToo technologies. Learn everything from fundamentals to system
administration.http://ads.osdn.com/?ad_id=1470&alloc_id=3638&op=click
_______________________________________________
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/bbdb-info
BBDB Home Page: http://bbdb.sourceforge.net/

Reply via email to