I have a bbdb entry with 2 email addresses.
When I want to change the net addresses I hit e over the net line.
When I just hit enter to keep the current net address I get an error:

bbdb-record-edit-net: Wrong type argument: arrayp, (["Stefan" "Reichör" nil nil nil 
nil ("[EMAIL PROTECTED]" "[EMAIL PROTECTED]") ((creation-date . "2001-05-03") (timestamp . 
"2002-01-11") (notes . "Wartberg")) ["Stefan Reichör" nil #<marker at 5945 in .bbdb> 
nil]])

I have the following entry:

Stefan Reichör
            net: [EMAIL PROTECTED], [EMAIL PROTECTED]




Emacs  : GNU Emacs 21.2.50.1 (i386-msvc-nt5.0.2195)
 of 2002-03-26 on HEIDI
Package: BBDB 2.35

current state:
==============
(setq
 emacs-version "21.2.50.1"
 bbdb-version-date "$Date: 2002/02/04 11:36:41 $"
 bbdb-file-format 6
 bbdb-no-duplicates-p t
 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" "Tragwein" "Freistadt" 
"Adresse"
                             "Hauptstraße 117" "Linz" "Hagenberg" "Wartberg" "RIIC" 
"LCM"
                             "Kundenbüro" "Privat")
 bbdb-after-change-hook '(bbdb/gnus-score-invalidate-alist)
 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-check-zip-codes-p t
 bbdb-complete-name-allow-cycling nil
 bbdb-complete-name-full-completion 5
 bbdb-complete-name-hooks '(ding)
 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 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 (omit creation-date timestamp) (toggle . t))
                             (full-multi-line))
 bbdb-dwim-net-address-allow-redundancy t
 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 200003
 bbdb-info-file nil
 bbdb-initialize-hook nil
 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-message-marker-field 'mark-char
 bbdb-mode-hook nil
 bbdb-modem-device "/dev/modem"
 bbdb-modem-dial nil
 bbdb-new-nets-always-primary nil
 bbdb-north-american-phone-numbers-p nil
 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" "Tragwein" "Allerheiligen" 
"Telefon"
                          "Handy" "Privat" "Fax" "Handy Hannes" "Handy Christina" 
"Linz" "Mobil"
                          "uni" "Station A8" "Kundenbüro" "Dienst")
 bbdb-pop-up-display-layout 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 'compose-mail
 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 "/usr/demo/SOUND/play"
 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/gnus-lines-and-from-length 18
 bbdb/gnus-score-default nil
 bbdb/gnus-score-field 'gnus-score
 bbdb/gnus-split-crosspost-default nil
 bbdb/gnus-split-default-group "mail.misc"
 bbdb/gnus-split-myaddr-regexp "^reichoer$\\|^reichoer@\\([-a-z0-9]+\\.\\)*riic.at$"
 bbdb/gnus-split-nomatch-function nil
 bbdb/gnus-split-private-field 'gnus-private
 bbdb/gnus-split-public-field 'gnus-public
 bbdb/gnus-summary-in-bbdb-format-letter "b"
 bbdb/gnus-summary-known-poster-mark "+"
 bbdb/gnus-summary-mark-known-posters t
 bbdb/gnus-summary-prefer-bbdb-data t
 bbdb/gnus-summary-prefer-real-names t
 bbdb/gnus-summary-show-bbdb-names t
 bbdb/gnus-summary-user-format-letter "B"
 bbdb/gnus-update-records-mode 'annotating
 bbdb/mail-auto-create-p t
 bbdb/news-auto-create-p nil
 bbdb/vm-set-auto-folder-alist-field 'vm-folder
 features '(eieio-opt apropos view pop3 nnfolder bbdb-gnus message-x gnus-delay 
gnus-draft
            gnus-agent gnus-srvr gnus-score score-mode nnvirtual gnus-cache nndraft 
nnmh gnus-pers
            nnir gnus-demon nntp debug bbdb-gui bbdb-snarf rmailsum mail-extr bbdb-com 
xref todoo
            reftex-vcr reftex-dcr reftex-auc reftex reftex-vars noutline outline 
font-latex latex
            tex vhdl-nav tree tcl lazy-lock vhdl-mode ede-dired eldoc semantic-el 
desktop
            filecache student-list-mode xsteve-pymacs pymacs midnight work-log 
mailalias sendmail
            progr-align grabbox remind-mode diminish babel bbdb-autoloads bbdb 
timezone webjump
            browse-url w3-auto xref-hks jka-compr tramp shell mmm-auto mmm-vars 
mmm-compat tmmofl
            mouse-embrace window-ring saveplace live-mode defaultcontent clipper toc 
hippie-exp
            boxes ffap findr findstr ange-ftp igrep tempbuf keep-buffers 
scroll-in-place
            minibuffer-complete-cycle rsz-mini icomplete browse-kill-ring misc 
newcomment ecb
            ecb-navigate ecb-help ecb-mode-line ecb-layout ecb-util tree-buffer avoid
            semantic-load semanticdb senator which-func semantic-imenu semantic-sb 
semantic-ctxt
            semantic-util-modes semantic-util semantic working ede-speedbar ede vc-cvs
            eieio-speedbar eieio-custom ede-source eieio-base eieio sb-rmail sb-html 
sb-texinfo
            sb-info info speedbar sb-image dframe assoc emacs-wiki pcomplete timeclock
            find-recursive ido ibuffer escreen power-macros calendar cal-menu pp 
esh-util
            esh-module esh-toggle gnus-dired gnus-msg gnus-art mm-uu mm-view gnus-sum 
nnoo
            gnus-group gnus-undo nnmail mail-source format-spec gnus-start gnus-range 
gnus-spec
            gnus-int gnus-win message rfc822 mml mml-sec mml-smime smime dig mml1991 
mml2015 gpg
            mm-decode executable mm-bodies mm-encode mailcap mail-parse rfc2045 
rfc2231 rfc2047 qp
            ietf-drums mailabbrev mailheader canlock dired-dd dired-dd-b3-menu wdired 
dired-x
            dired-aux pydoc python-mode comint ring vsim-nav cwarn cc-mode cc-align 
cc-cmds
            cc-engine cc-styles cc-langs cc-vars cc-menus imenu cc-defs derived 
latex-doc
            latex-doc-var help-fns help-mode button cl cl-19 skeleton tex-font 
tex-site edmacro
            screen-lines hideshow printing cus-edit cus-start cus-load gnus gnus-ems 
gnus-util
            time-date parse-time nnheader mm-util mail-prsvr mh-utils mh-e rmail 
mail-utils
            ps-print lpr msb mouse-copy cua cua-mode CUA-mode rect paren stig-paren 
reporter
            emacs-functions dired diff-mode advice byte-opt compile bytecomp 
byte-compile
            advice-preload uniquify autorevert ehelp electric recentf wid-edit 
easymenu generic-x
            jit-lock font-lock regexp-opt syntax generic gnuserv ispell tooltip image 
tool-bar
            easy-mmode fontset ediff-hook vc-hooks lisp-float-type dos-w32 disp-table 
ls-lisp
            lisp-mode page menu-bar timer select scroll-bar mldrag mouse facemenu 
frame ucs-tables
            georgian utf-8-lang misc-lang vietnamese tibetan thai lao korean japanese 
hebrew greek
            romanian slovak czech european ethiopic devanagari indian cyrillic chinese 
case-table
            help faces cus-face text-properties overlay md5 base64 format mule env 
custom widget
            backquote make-network-process)
 )




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

Reply via email to