Hi this time I checked the archives and did not find that one.
When executing  bbdb/vm-show-sender I get blabla not in db add?
I say *yes* and get 
the following bug report I attach:


Uwe Brauer 
Signaling: (void-function bbdb-event-to-character)
  bbdb-event-to-character(#<keypress-event y>)
  bbdb-prompt-for-create()
  apply(bbdb-prompt-for-create nil)
  bbdb-invoke-hook-for-value(bbdb-prompt-for-create)
  bbdb-annotate-message-sender(("Manoli Coronado" "[EMAIL PROTECTED]") t t 
bbdb-prompt-for-create)
  byte-code("..." [bbdb-update-records-mode annotating bbdb-annotate-message-sender 
bbdb-address t offer-to-create auto-create-p bbdb-prompt-for-create searching "^" 
regexp-quote "$" bbdb-case-fold-search net nil bbdb-records record records 
case-fold-search matches 6 done rest-of-nets string-match "" hits processed-addresses 
bbdb-silent-running bbdb-gag-messages bbdb-offer-to-create quit 5 0 format "Hit C-g to 
stop BBDB from %s.  %d of %d addresses processed." addrslen mess featurep xemacs 
bbdb-display-message progress message sit-for] 6)
  bbdb-update-records(((authors "From" ("Manoli Coronado" 
"[EMAIL PROTECTED]"))) t t)
  bbdb/vm-update-records(t)
  bbdb/vm-show-records(authors)
  bbdb/vm-show-sender(1)
  call-interactively(bbdb/vm-show-sender)



Emacs  : XEmacs 21.1 (patch 14) "Cuyahoga Valley" [Lucid] (i686-pc-linux) of Tue Nov  
6 2001 on sunma2
Package: BBDB 2.34

current state:
==============
(setq
 emacs-version "21.1 (patch 14) \"Cuyahoga Valley\" XEmacs Lucid"
 bbdb-version-date "$Date: 2002/01/15 22:53:47 $"
 bbdb-file-format 6
 bbdb-no-duplicates-p nil
 bbdb-addresses-label-list '("Home" "Office" "Mobile" "Other")
 bbdb-after-change-hook nil
 bbdb-after-read-db-hook nil
 bbdb-always-add-addresses nil
 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-completion-display-record t
 bbdb-completion-type nil
 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-dial-local-prefix nil
 bbdb-dial-local-prefix-alist '(((if bbdb-default-area-code
                                                                  (format "(%03d)" 
bbdb-default-area-code) "")
                                                                 "")
                                                                )
 bbdb-dial-long-distance-prefix nil
 bbdb-display-layout nil
 bbdb-display-layout-alist '((one-line (order phones mail-alias net notes)
                                                          (name-end . 24) (toggle . t))
                                                         (multi-line (indention . 14) 
(toggle . t))
                                                         (pop-up-multi-line (indention 
. 14)))
 bbdb-dwim-net-address-allow-redundancy t
 bbdb-electric-p nil
 bbdb-elided-display nil
 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 2)
                                                                                  
("\\(\\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-file "~/.bbdb"
 bbdb-file-remote nil
 bbdb-file-remote-save-always t
 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-list-hook '(bbdb-fontify-buffer)
 bbdb-load-hook nil
 bbdb-message-caching-enabled t
 bbdb-mode-hook 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" "91")
 bbdb-pop-up-display-layout nil
 bbdb-pop-up-elided-display nil
 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-use-alternate-names 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-virtual-folder-alist-by-mail-alias-alist nil
 features '(reporter vm-virtual vm-sort vm-delete smtpmail feedmail view-less
                        view atomic-extents flyspell footnote auto-capitalize gnus-art
                        mm-uu mm-view gnus-sum gnus-group gnus-undo nnmail mail-source
                        format-spec gnus-start gnus-range gnus-spec gnus-int gnus-win 
gnus
                        gnus-ems gnus-xmas wid-edit gnus-util font bbdb-xemacs bbdb-gui
                        vm-page vm-mime lazy-lock vm-toolbar vm-summary tapestry 
vm-motion
                        vm-undo mailcrypt comint ring vm-folder vm-misc vm-mouse 
vm-window
                        vm-serial vm-biff vm-summary-faces vm-pcrisis vm-reply 
vm-grepmail
                        vm-menu vm-ps-print ps-print time-stamp vm-save vm-minibuf
                        vm-rfaddons gnuserv vm-pine vm-macro vm-message vm-avirtual
                        bbdb-vm bbdb-snarf mail-extr rfc822 vm-autoload 
highlight-headers
                        vm-vars vm-startup vm-version vm dired-faces dired-xemacs dired
                        x-symbol-xmas21 x-symbol-hooks lstlisting htmlize euro esms
                        esms-conf esms-ssp-funs my-replace rcy-paren file-confirm
                        my-paragraph lazy-capitialize smiley annotations recent-files
                        my-count-ascii-region auto-insert-tkld ivl2r vishebrew
                        AbHebrew-mode AbIvrit-mode bidi-utils my-hebrew-font
                        highlight-current-line saveplace saveconf template session
                        cal-desk-calendar lunar solar cal-dst cal-persia cal-Julian
                        diary-lib appt calendar sigadapt bbdb-com mail-abbrevs sendmail
                        message messagexmas mml mm-decode mm-encode mailcap mm-bodies
                        uudecode mail-parse rfc2045 rfc2047 qp base64 rfc2231 
ietf-drums
                        time-date parse-time nnheader nnheaderxm mm-util mail-prsvr
                        mail-utils mailheader auto-lang regexp-opt bbdb timezone
                        change-mode disp-table dimish crypt crypt++ crypt+pgp-pub align
                        iso2win font-lock filladapt xref-bmk xref-hks checkdoc texmathp
                        paren mic-paren timer latex-all-hs time footnote-cla word2txt
                        extra follow ccheck-brac iso-acc rotate counter redo cus-face
                        whitespace-mode ln unscroll query-replace-region uuencode 
mailfile
                        date switch-buffer byte-optimize bytecomp byte-compile 
tiny-test
                        tinypair tinylib efs-cu efs-x19\.15 efs-fnh efs-ovwrt efs-auto
                        tinylibm tinylibb all tex-site ispell my-functions dired-tar
                        compile folding-isearch folding overlay advice advice-preload
                        xemacs_keys zenirc-autoloads xemacs-devel-autoloads
                        xemacs-base-autoloads w3-autoloads vm-autoloads viper-autoloads
                        view-process-autoloads vhdl-autoloads vc-autoloads 
tpu-autoloads
                        tooltalk-autoloads tm-autoloads time-autoloads 
textools-autoloads
                        text-modes-autoloads texinfo-autoloads supercite-autoloads
                        strokes-autoloads speedbar-autoloads sounds-wav-autoloads
                        sounds-au-autoloads slider-autoloads sh-script-autoloads
                        sgml-autoloads semantic-autoloads scheme-autoloads 
rmail-autoloads
                        reftex-autoloads psgml-autoloads ps-print-nomule-autoloads
                        prog-modes-autoloads pcl-cvs-autoloads pc-autoloads
                        os-utils-autoloads net-utils-autoloads misc-games-autoloads
                        mine-autoloads mh-e-autoloads mew-autoloads mailcrypt-autoloads
                        mail-lib-autoloads jde-autoloads ispell-autoloads 
ilisp-autoloads
                        igrep-autoloads idlwave-autoloads hm--html-menus-autoloads
                        gnus-autoloads gnats-autoloads games-autoloads
                        fsf-compat-autoloads frame-icon-autoloads forms-autoloads
                        footnote-autoloads eudc-autoloads eterm-autoloads 
emerge-autoloads
                        elib-autoloads eicq-autoloads efs-autoloads edt-autoloads
                        edit-utils-autoloads ediff-autoloads edebug-autoloads
                        dired-autoloads debug-autoloads crisp-autoloads 
cookie-autoloads
                        cc-mode-autoloads calendar-autoloads calc-autoloads
                        c-support-autoloads bbdb-autoloads auctex-autoloads 
apel-autoloads
                        ada-autoloads Sun-autoloads x-symbol-autoloads 
Standard-autoloads
                        loadhist auto-show fontl-hooks x-iso8859-1 menubar-items 
x-menubar
                        mouse mode-motion itimer auto-save lisp-mode easymenu iso8859-1
                        page buff-menu lib-complete help-nomule derived frame 
text-props
                        cus-start custom widget cl-extra mini-cl cl cl-19 packages
                        backquote very-early-lisp lucid-scrollbars cut-buffer
                        lucid-menubars xface athena-dialogs x tty-frames tty tool bar
                        native-sound scrollbar unix-processes multicast network-streams
                        subprocesses menubar berkeley-db md5 xemacs tiff png gif jpeg 
xpm
                        lisp-float-type linux dialog devices window-system 
c-balloon-help)
 )


Reply via email to