Emacs  : GNU Emacs 21.3.50.1 (i386-msvc-nt5.0.2195)
 of 2003-11-10 on WINSTEINGOLDLAP
Package: BBDB 2.35

(bbdb-extract-field-value "Organization"), when called from
`bbdb-auto-notes-hook' via `bbdb-auto-notes-alist',
returns `fieldval' of "Universit\xc3\xa4t Z\xc3\xbcrich"
while (mail-fetch-field "Organization") in the same buffer returns
"UniversitÃt ZÃrich"



current state:
==============
(setq
 emacs-version "21.3.50.1"
 bbdb-version-date "$Date: 2003/08/05 12:29:30 $"
 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-after-change-hook '(bbdb/gnus-score-invalidate-alist)
 bbdb-after-read-db-hook nil
 bbdb-always-add-addresses nil
 bbdb-auto-notes-alist '(("Web" (".*" www 0)) ("X-Web" (".*" www 0))
                         ("X-WWW-Homepage" (".*" www 0))
                         ("X-Url" (".*" www 0)) ("X-Url-From" (".*" www 0))
                         ("Organization" (".*" company 0))
                         ("Organisation" (".*" company 0))
                         ("X-Organisation" (".*" company 0))
                         ("X-Organization" (".*" company 0)))
 bbdb-auto-notes-ignore '(("Organization" .
                           "^.$\\|^Gateway\\|^Source 
only\\|Usenet\\|^[nN]one\\|^--$\\|^=\\|[uU]nknown\\|eh\\?\\|Another Netscape Collabra 
Server User\\|http://groups.google.com/\\|deja.com\\|posted 
\\|randori.com\\||EarthLink Inc. -- http://www.EarthLink.net\\|giganews\\|Gnus 
Information Center\\|Road Runner\\|Broadband\\|Internet\\|customer of\\|client 
of\\|EarthLink Inc")
                          )
 bbdb-auto-notes-ignore-all nil
 bbdb-auto-revert-p nil
 bbdb-canonical-hosts 
"cs\\.cmu\\.edu\\|ri\\.cmu\\.edu\\|edrc\\.cmu\\.edu\\|andrew\\.cmu\\.edu\\|mcom\\.com\\|netscape\\.com\\|cenatls\\.cena\\.dgac\\.fr\\|cenaath\\.cena\\.dgac\\.fr\\|irit\\.fr\\|enseeiht\\.fr\\|inria\\.fr\\|cs\\.uiuc\\.edu\\|xemacs\\.org"
 bbdb-canonicalize-net-hook '(#[(addr)
                                "\301\302\"\203.\303\304\"\303\305\"P\207\207"
                                [addr string-match
                                 
"^\\(.+?\\)\\(.\\)dated\\2[0-9]+\\.[0-9a-fA-F]+\\(@.*\\)" match-string 1 3]
                                4]
                              )
 bbdb-canonicalize-redundant-nets-p t
 bbdb-case-fold-search t
 bbdb-change-hook '(bbdb-sort-phones bbdb-sort-notes bbdb-sort-addresses
                    bbdb-timestamp-hook)
 bbdb-check-zip-codes-p t
 bbdb-complete-name-allow-cycling t
 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 617
 bbdb-default-country nil
 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 "9"
 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 "1"
 bbdb-display-layout 'full-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 '(("\".* via RT\"[EMAIL PROTECTED]" nil
                                           (cadr
                                            (mail-extract-address-components
                                             adstring)
                                            )
                                           )
                                          ("\"\\([^\"]*\\)\"\\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-extract-address-components
 bbdb-file "d:/sds/.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 nil
 bbdb-gui nil
 bbdb-hashtable-size 10007
 bbdb-ignore-most-messages-alist nil
 bbdb-ignore-selected-messages-confirmation nil
 bbdb-ignore-some-messages-alist nil
 bbdb-info-file "d:/gnu/sitelisp/bbdb/texinfo/bbdb.info"
 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 "\301\211.\207" [bbdb-file-coding-system utf-8-unix]
                    2]
                  )
 bbdb-message-caching-enabled t
 bbdb-message-marker-field 'mark-char
 bbdb-mode-hook '(#[nil "\301\302\303!\"\207"
                    [bbdb-buffer-name add-to-list gnus-buffers get-buffer] 4]
                  )
 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 t
 bbdb-notice-hook 'bbdb-auto-notes-hook
 bbdb-offer-save t
 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 'message
 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 "%Y-%m-%d"
 bbdb-update-records-mode 'annotating
 bbdb-use-alternate-names t
 bbdb-use-pop-up t
 bbdb-user-mail-names "sds@"
 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 "^sds$\\|[EMAIL PROTECTED]([-a-z0-9]+\\.\\)*gnu.org$"
 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
 bbdb/vm-set-auto-folder-alist-headers '("From:" "To:" "CC:")
 features '(reporter cl-specs edebug etags pp wid-browse rot13 apropos
            gnus-draft mailalias smtpmail sendmail ispell bbdb-w3 newcomment
            dabbrev flow-fill log-edit skeleton sgml-mode browse-url url-dav
            url-http url-gw w3-style w3-hot url-file url-dired w3-toolbar
            w3-emacs w3-props url-auth w3 w3-menu cus-edit cus-start cus-load
            w3-emulate w3-parse w3-fast-parse xml w3-display w3-mouse w3-imap
            url-handlers w3-widget w3-vars w3-keymap w3-cus css font devices
            w3-cfg w3-sysdp cookie1 bbdb-hooks sort gnus-cite smiley
            gnus-async gnus-bcklg gnus-dup gnus-ml pop3 nnfolder utf7 starttls
            nnimap nndraft nnmh bbdb-gnus bbdb-snarf mail-extr bbdb-com
            gnus-demon gnus-agent gnus-srvr gnus-score score-mode nnvirtual
            gnus-msg gnus-art rfc1843 mm-uu mml2015 mm-view nntp gnus-cache
            gnus-sum nnoo gnus-group mm-url executable url url-proxy
            url-privacy url-expand url-methods url-history url-cookie url-util
            url-parse url-vars gnus-undo nnmail mail-source imap ange-ftp
            tramp-ftp tramp-vc vc-rcs tramp shell comint format-spec trampver
            gnus-start gnus-spec gnus-int gnus-range message warnings
            dired-aux pcvs pcvs-parse pcvs-info pcvs-defs pcvs-util ewoc
            find-func loadhist debug derived rfc822 mml mml-sec mml-smime
            smime dig mm-decode mm-bodies mm-encode mailcap mail-parse rfc2045
            rfc2231 rfc2047 qp ietf-drums mailabbrev mailheader canlock
            gnus-win gnus gnus-ems nnheader gnus-util netrc time-date
            mail-utils mm-util mail-prsvr wid-edit compile diff-mode easymenu
            easy-mmode mule-util time-stamp vc ring add-log dired regexp-opt
            parse-time vc-cvs midnight w3-auto url-auto bbdb-autoloads bbdb
            timezone jka-compr fringe jit-lock font-lock syntax paren byte-opt
            bytecomp byte-compile advice help-fns help-mode view button
            advice-preload cl cl-19 tooltip image tool-bar mwheel 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 font-core frame ucs-tables georgian utf-8-lang misc-lang
            vietnamese tibetan thai lao korean japanese hebrew greek romanian
            slovak czech european ethiopic kannada tamil malayalam devanagari
            indian cyrillic chinese case-table help simple faces cus-face
            text-properties overlay md5 base64 format mule env custom widget
            backquote make-network-process)
 )
-- 
Sam Steingold (http://www.podval.org/~sds) running w2k
<http://www.camera.org> <http://www.iris.org.il> <http://www.memri.org/>
<http://www.mideasttruth.com/> <http://www.honestreporting.com>
Small languages require big programs, large languages enable small programs.





-------------------------------------------------------
This SF.Net email sponsored by: ApacheCon 2003,
16-19 November in Las Vegas. Learn firsthand the latest
developments in Apache, PHP, Perl, XML, Java, MySQL,
WebDAV, and more! http://www.apachecon.com/
_______________________________________________
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/bbdb-info
BBDB Home Page: http://bbdb.sourceforge.net/

Reply via email to