I have a problem with bbdb 1.48. I just installed it and decided to use the
mail-alias feature.
I have a.o the following entries:
Dennis Gruijs - SP groep
net: [EMAIL PROTECTED]
timestamp: 21 Sep 93
mail-alias: sp-groep
Herman Haverkort - SP groep
net: [EMAIL PROTECTED]
timestamp: 21 Sep 93
mail-alias: sp-groep
Arjan van Yzendoorn - SP groep
net: [EMAIL PROTECTED]
timestamp: 21 Sep 93
mail-alias: sp-groep
Now when I do a reply to an arbitrary mail message (from VM 5.35) I get the
following error: Note that the sp-groep alias is from the bbdb file, but
the sp-team alias is from the .mailrc file. (There were some other aliases
that I edited out.). Besides the strange error message I also noticed the
comma's in the mail addresses of the sp-groep alias which shouldn't be
there.
Signalling: (wrong-type-argument vectorp (("sp-groep" . "Dennis, Gruijs,
<[EMAIL PROTECTED]>, Herman, Haverkort, <[EMAIL PROTECTED]>, Arjan, van,
Yzendoorn, <[EMAIL PROTECTED]>") ("sp-team" . "hansp, peterb, piet, wiebe,
bcharef, jjkooi, fwpoppel, afyzendo, dgruijs, hjhaverk, vtweimer, mbloem,
mmeijers, popmeer, mmaat")))
intern-soft("sp-groep" (("sp-groep" . "Dennis, Gruijs,
<[EMAIL PROTECTED]>, Herman, Haverkort, <[EMAIL PROTECTED]>, Arjan, van,
Yzendoorn, <[EMAIL PROTECTED]>") ("sp-team" . "hansp, peterb, piet,
wiebe, bcharef, jjkooi, fwpoppel, afyzendo, dgruijs, hjhaverk, vtweimer,
mbloem, mmeijers, popmeer, mmaat")))
byte-code("ABCDEF
C C
[bbdb-define-all-aliases-field "." target nil notes mapcar (lambda (x)
(byte-code "@ @!" [intern x] 2)) --bbdb-obuf-- ((set-buffer
--bbdb-obuf--)) find-file-noselect bbdb-file nowarn bbdb-debug
get-buffer-window buffer-name get-buffer w ((byte-code
"
bbdb-case-fold-search bbdb-records record records case-fold-search
all-fields matches string-match bbdb-record-notes "" * tmp done fields 7
bbdb-record-getprop nreverse result aliases match bbdb-split "," assoc
nconc downcase mapconcat bbdb-dwim-net-address boundp
mail-alias-separator-string ", " expansion alias fboundp
define-mail-abbrev define-mail-alias intern-soft mail-abbrevs
mail-aliases error "couldn't find the alias we just defined!"
mail-abbrev-expand-hook "mail-aliases contains unexpected hook %s" lambda
bbdb-mail-abbrev-expand-hook quote (lambda (x) (byte-code "AH@"
[x 6] 2))] 9) bbdb-define-all-aliases() funcall(bbdb-define-all-aliases)
mapcar(funcall (sc-perform-overloads (lambda nil (fset (quote
mail-do-fcc) (symbol-function (quote vmsx-do-fcc))))
bbdb-insinuate-sendmail bbdb-define-all-aliases (lambda nil (require
(quote mail-abbrevs)))))
byte-code("7
[hooklist sym value boundp lambda mapcar funcall] 6)
run-hooks(mail-setup-hook)
byte-code("@
Fp!GH!
3
;C
$
Q#%?
[generate-new-buffer buffer-name "*VM-mail*" auto-save-mode
auto-save-default mail-mode switch-to-buffer fboundp mail-aliases-setup
mail-aliases t nil file-exists-p "~/.mailrc" build-mail-aliases
vm-mail-header-from "From: " "\n" insert "To: " to "" cc "Cc: " "Subject:
" subject newsgroups "Newsgroups: " in-reply-to "In-Reply-To: "
references "References: " mail-default-reply-to "Reply-To: "
mail-self-blind "Bcc: " user-login-name mail-archive-file-name "FCC: "
mail-header-separator vm-set-window-configuration composing-message
mail-position-on-field "To" run-hooks mail-setup-hook] 4)
vm-mail-internal("reply to Louis van Dompselaar" "Louis van Dompselaar
<[EMAIL PROTECTED]>" "Re: NFSS en dutch.sty"
"<[EMAIL PROTECTED]>" nil
"<[EMAIL PROTECTED]>" nil) byte-code(" @
pA\n! E \n
v =,
\ab ! \"c\")t
!!G
[widen vm-select-marked-or-prefixed-messages count default-directory
vm-message-pointer nil newsgroups tmp2 tmp references in-reply-to mp
subject cc to message-pointer dir mlist mail-buffer
vm-get-header-contents "Reply-To" "From" vm-grok-From_-author error "No
From: or Reply-To: header in message" "Subject" vm-in-reply-to-format
vm-sprintf equal "" vm-reply-subject-prefix t case-fold-search
string-match regexp-quote 0 "," to-all "To" "Cc" "References"
"In-reply-to" "Message-ID" "Followup-To" "Newsgroups"
vm-strip-reply-headers mail-use-rfc822 mail-strip-quoted-names
vm-parse-addresses vm-reply-ignored-addresses vm-strip-ignored-addresses
vm-delete-duplicates append copy-sequence mapconcat identity ",\n " delq
" " vm-parse "[^<]*\\(<[^>]+>\\)" "\n " "[
\n,]*\\([^
\n,]+\\)" vm-mail-internal format "reply to %s%s" vm-su-full-name ",
..." use-local-map copy-keymap current-local-map local-set-key ""
vm-yank-message "y" vm-yank-message-other-folder "" vm-mail-send
"" vm-mail-send-and-exit "" vm-mode-map make-local-variable
vm-reply-list vm-mail-buffer replying vm-system-state include-text
re-search-forward "^" mail-header-separator "$" forward-char 1] 14)
vm-do-reply(nil t 1) byte-code("@
GEH #" [vm-follow-summary-cursor vm-mail-buffer
buffer-name bufferp vm-summary-buffer nil vm-error-if-folder-empty
vm-do-reply t count] 4) vm-reply-include-text(1)
* call-interactively(vm-reply-include-text)
Piet* van Oostrum, Dept of Computer Science, Utrecht University,
Padualaan 14, P.O. Box 80.089, 3508 TB Utrecht, The Netherlands.
Telephone: +31 30 531806 Uucp: uunet!ruuinf!piet
Telefax: +31 30 513791 Internet: [EMAIL PROTECTED] (*`Pete')
X-400: G=Piet;S=van.Oostrum;OU=cs;O=ruu;PRMD=surf;ADMD=400net;C=nl;
