Received: (at submit) by bugs.debian.org; 8 Dec 2000 22:25:24 +0000
From perkens@sdm.de Fri Dec 08 16:25:24 2000
Return-path: <perkens@sdm.de>
Received: from sdmmx1.sdm.de [192.76.162.232] 
	by master.debian.org with smtp (Exim 3.12 1 (Debian))
	id 144VxE-0002h7-00; Fri, 08 Dec 2000 16:25:24 -0600
Received: FROM muccpu1.muc.sdm.de BY sdmmx1.sdm.de ; Fri Dec 08 23:24:06 2000 0000
Received: by muccpu1.muc.sdm.de (Sendmail 8.9.3+Sun) via ESMTP for <submit@bugs.debian.org>
	from aichberg id XAA21059; Fri, 8 Dec 2000 23:25:05 +0100 (MET)
Received: by aichberg
	via sendmail from stdin
	id <m144RKL-00039vC@aichberg> (Debian Smail3.2.0.111)
	for submit@bugs.debian.org; Fri, 8 Dec 2000 18:28:57 +0100 (CET) 
Message-Id: <m144RKL-00039vC@aichberg>
Date: Fri, 8 Dec 2000 18:28:57 +0100 (CET)
From: Burkhard Perkens-Golomb <perkens@sdm.de>
Subject: xemacs21-basesupport: eudc not working
To: submit@bugs.debian.org
X-Mailer: bug 3.3.7
Delivered-To: submit@bugs.debian.org

Package: xemacs21-basesupport
Version: 1999.12.15-1
Severity: normal

I try to use eudc with my BBDB adress book. I open "Tools->Query with
form", insert a name and start the query. Xemacs complains with (I've
set debug-on-error to t):

Signaling: (invalid-function (macro . #<compiled-function (vector) "...(5)" [aref vector 4] 3>))
  bbdb-record-phones([nil "DPG" nil "DPG" nil nil ("arias@snhonnef1.pbh.uni-bonn.de") ((notes . "Deutsche Physikalische Gesellschaft") (creation-date . "2000-04-04") (timestamp . "2000-04-04")) ["DPG" nil #<marker at 49 in .bbdb 0x89608dc> nil]])
  eudc-bbdb-extract-phones([nil "DPG" nil "DPG" nil nil ("arias@snhonnef1.pbh.uni-bonn.de") ((notes . "Deutsche Physikalische Gesellschaft") (creation-date . "2000-04-04") (timestamp . "2000-04-04")) ["DPG" nil #<marker at 49 in .bbdb 0x89608dc> nil]])
  eudc-bbdb-format-record-as-result([nil "DPG" nil "DPG" nil nil ("arias@snhonnef1.pbh.uni-bonn.de") ((notes . "Deutsche Physikalische Gesellschaft") (creation-date . "2000-04-04") (timestamp . "2000-04-04")) ["DPG" nil #<marker at 49 in .bbdb 0x89608dc> nil]])
  mapcar(eudc-bbdb-format-record-as-result ([nil "DPG" nil "DPG" nil nil ("arias@snhonnef1.pbh.uni-bonn.de") (... ... ...) ["DPG" nil #<marker at 49 in .bbdb 0x89608dc> nil]]))
  eudc-bbdb-query-internal(((lastname . "DPG")) nil)
  eudc-query(((name . "DPG")))
  eudc-process-form()
  #<compiled-function (&rest ignore) "...(3)" [eudc-process-form] 1>((push-button :to #<marker in no buffer 0x898a33c> :from #<marker in no buffer 0x898a324> :button-extent #<extent (detached) H keymap button-or-field button 0x896cfb8 from Killed Buffer> :glyph-inactive #<glyph (buffer) #<image-specifier global=... fallback=... 0x6faa>0x6fa9> :glyph-down #<glyph (buffer) #<image-specifier global=... fallback=... 0x6f9d>0x6f9c> :glyph-up #<glyph (buffer) #<image-specifier global=... fallback=... 0x6f90>0x6f8f> :notify #<compiled-function (&rest ignore) "...(3)" [eudc-process-form] 1> :value "Query Server" :args nil) (push-button :to #<marker in no buffer 0x898a33c> :from #<marker in no buffer 0x898a324> :button-extent #<extent (detached) H keymap button-or-field button 0x896cfb8 from Killed Buffer> :glyph-inactive #<glyph (buffer) #<image-specifier global=... fallback=... 0x6faa>0x6fa9> :glyph-down #<glyph (buffer) #<image-specifier global=... fallback=... 0x6f9d>0x6f9c> :glyph!
-up #<glyph (buffer) #<image-specifier global=... fallback=... 0x6f90>0x6f8f> :notify #<compiled-function (&rest ignore) "...(3)" [eudc-process-form] 1> :value "Query Server" :args nil) #<buttonup-event button1up>)
  widget-apply((push-button :to #<marker in no buffer 0x898a33c> :from #<marker in no buffer 0x898a324> :button-extent #<extent (detached) H keymap button-or-field button 0x896cfb8 from Killed Buffer> :glyph-inactive #<glyph (buffer) #<image-specifier global=... fallback=... 0x6faa>0x6fa9> :glyph-down #<glyph (buffer) #<image-specifier global=... fallback=... 0x6f9d>0x6f9c> :glyph-up #<glyph (buffer) #<image-specifier global=... fallback=... 0x6f90>0x6f8f> :notify #<compiled-function (&rest ignore) "...(3)" [eudc-process-form] 1> :value "Query Server" :args nil) :notify (push-button :to #<marker in no buffer 0x898a33c> :from #<marker in no buffer 0x898a324> :button-extent #<extent (detached) H keymap button-or-field button 0x896cfb8 from Killed Buffer> :glyph-inactive #<glyph (buffer) #<image-specifier global=... fallback=... 0x6faa>0x6fa9> :glyph-down #<glyph (buffer) #<image-specifier global=... fallback=... 0x6f9d>0x6f9c> :glyph-up #<glyph (buffer) #<image-specifier global=!
... fallback=... 0x6f90>0x6f8f> :notify #<compiled-function (&rest ignore) "...(3)" [eudc-process-form] 1> :value "Query Server" :args nil) #<buttonup-event button1up>)
  widget-item-action((push-button :to #<marker in no buffer 0x898a33c> :from #<marker in no buffer 0x898a324> :button-extent #<extent (detached) H keymap button-or-field button 0x896cfb8 from Killed Buffer> :glyph-inactive #<glyph (buffer) #<image-specifier global=... fallback=... 0x6faa>0x6fa9> :glyph-down #<glyph (buffer) #<image-specifier global=... fallback=... 0x6f9d>0x6f9c> :glyph-up #<glyph (buffer) #<image-specifier global=... fallback=... 0x6f90>0x6f8f> :notify #<compiled-function (&rest ignore) "...(3)" [eudc-process-form] 1> :value "Query Server" :args nil) #<buttonup-event button1up>)
  widget-apply((push-button :to #<marker in no buffer 0x898a33c> :from #<marker in no buffer 0x898a324> :button-extent #<extent (detached) H keymap button-or-field button 0x896cfb8 from Killed Buffer> :glyph-inactive #<glyph (buffer) #<image-specifier global=... fallback=... 0x6faa>0x6fa9> :glyph-down #<glyph (buffer) #<image-specifier global=... fallback=... 0x6f9d>0x6f9c> :glyph-up #<glyph (buffer) #<image-specifier global=... fallback=... 0x6f90>0x6f8f> :notify #<compiled-function (&rest ignore) "...(3)" [eudc-process-form] 1> :value "Query Server" :args nil) :action #<buttonup-event button1up>)
  widget-apply-action((push-button :to #<marker in no buffer 0x898a33c> :from #<marker in no buffer 0x898a324> :button-extent #<extent (detached) H keymap button-or-field button 0x896cfb8 from Killed Buffer> :glyph-inactive #<glyph (buffer) #<image-specifier global=... fallback=... 0x6faa>0x6fa9> :glyph-down #<glyph (buffer) #<image-specifier global=... fallback=... 0x6f9d>0x6f9c> :glyph-up #<glyph (buffer) #<image-specifier global=... fallback=... 0x6f90>0x6f8f> :notify #<compiled-function (&rest ignore) "...(3)" [eudc-process-form] 1> :value "Query Server" :args nil) #<buttonup-event button1up>)
  widget-glyph-click(#<buttonup-event button1up>)
  widget-button1-click(#<buttonup-event button1up>)
  call-interactively(widget-button1-click)

Relevant part of my .emacs:

,----
| (require 'eudc)
| (eval-after-load
|     "message"
|   '(define-key message-mode-map [(control ?c) (tab)] 'eudc-expand-inline))
| (eval-after-load
|     "sendmail"
|   '(define-key mail-mode-map [(control ?c) (tab)] 'eudc-expand-inline))
`----

Content of .eudc-options:

,----
| ;; This file was automatically generated by eudc.el.
| 
| (provide 'eudc-options-file)
| (eudc-set-server "localhost" 'bbdb t)
| (setq eudc-server-hotlist '(("localhost" . bbdb)))

`----

Xemacs version is 21.1.10-4.

Thanks,

	Burkhard

-- System Information
Debian Release: 2.2
Kernel Version: Linux aichberg 2.2.17 #1 Fri Sep 29 16:10:31 CEST 2000 i686 unknown

Versions of the packages xemacs21-basesupport depends on:
ii  perl-5.005     5.005.03-7.1   Larry Wall's Practical Extracting and Report
ii  perl-5.005     5.005.03-7.1   Larry Wall's Practical Extracting and Report
	^^^ (Provides virtual package perl5)
perl5-thread	Not installed or no info
perl-5.004	Not installed or no info
perl-5.005-thread	Not installed or no info