[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index][Search]
Emacspeak and BBDB
- To: Emacspeak <emacspeak@xxxxxxxxxxx>
- Subject: Emacspeak and BBDB
- From: Koichi INOUE <kinoue@xxxxxxxxxxx>
- Date: 01 Oct 1999 13:18:14 +0900
- Old-Return-Path: <kinoue@xxxxxxxxxxx>
- Resent-Date: Fri, 1 Oct 1999 00:20:10 -0400 (EDT)
- Resent-From: emacspeak@xxxxxxxxxxx
- Resent-Message-ID: <"qbjmWC.A.a_G.mZD93"@hub>
- Resent-Sender: emacspeak-request@xxxxxxxxxxx
- User-Agent: ET-gnus/6.11.07 (based on Pterodactyl Gnus v0.93) (revision 01) SEMI/1.13.4 (Terai) FLIM/1.13.0 (Iwami) Emacs/20.4 (sparc-sun-solaris2.6) MULE/4.0 (HANANOEN)
Hello,
I use BBDB with Emacs.
But it doesn't run well with emacspeak as follows:
Invoke emacs with "emacs --unibyte -q"
Then in *scratch* buffer, input:
(require 'bbdb) C-j
(load-library "emacspeak-setup") C-j
It claims that synbol's value as variable is void:
emacspeak-resource-directory.
That variable is defined in emacspeak-setup.el so it must be defined.
The backtrace is as follows:
----
Signaling: (void-variable emacspeak-resource-directory)
byte-code("!Q" [emacspeak-resource-directory emacspeak-pronounce-dictionaries-file proclaim (special emacspeak-resource-directory) "/" ".dictionary"] 3)
require(emacspeak-pronounce)
byte-code("!-H-A!-H-A!-H-A!-H-A!-H-A!" [require cl proclaim (optimize (safety 0) (speed 3)) dtk-interp dtk-voices emacspeak-sounds emacspeak-pronounce] 2)
require(dtk-tcl)
byte-code("!-H-A!-H-A!" [require cl proclaim (optimize (safety 0) (speed 3)) dtk-tcl] 2)
require(dtk-speak)
byte-code("!-H-A!-H-A!-H-A!-H-A!" [require cl proclaim (optimize (safety 0) (speed 3)) backquote thingatpt dtk-speak] 2)
require(emacspeak-speak)
byte-code("!-H-A!-H-A!-H-A!-H-A!-H-A!-H-A\"-H-A$-H-A\"-H-A$-H-A\"-H-A$-H-A\"-H-A$-H-A\"-H-A$-H-A\"-H-A$-H-A\"-H-A$-H-A\"-H-A$-H-A\"-H-A$-H-A\"-H-A$-H-A\"-H-A$-H-A\"-H-A$-H-A\"-H-A$-H-A\"-H-A :-C-A @!-C-A !-C-A \fB) A-B-A *!" [bbdb-electric-p G31700 f command emacspeak-interactive-functions-that-are-fixed require cl proclaim (optimize (safety 0) (speed 3)) emacspeak-speak emacspeak-sounds (special bbdb-electric-p) nil (special bbdb-mode-map) add-hook bbdb-mode-hook #[nil "#-H-A#-H-A#" [bbdb-mode-map define-key "b" bbdb "N" bbdb-name "c" bbdb-create] 4] ad-add-advice bbdb-delete-current-field-or-record (emacspeak nil t (advice lambda nil "Provide auditory feedback" ...)) after ad-activate-on bbdb-edit-current-field (emacspeak nil t (advice lambda nil "Provide auditory feedback" ...)) before bbdb-send-mail (emacspeak nil t (advice lambda nil "Provide auditory feedback" ...)) bbdb-next-record (emacspeak nil t (advice lambda nil "Provide auditory feedback" ...)) bbdb-prev-record (emacspeak nil t (advice lambda nil "Provide auditory feedback" ...)) bbdb-omit-record (emacspeak nil t (advice lambda nil "Provide auditory feedback" ...)) bbdb-bury-buffer (emacspeak nil t (advice lambda nil "Provide auditory feedback" ...)) bbdb-elide-record (emacspeak nil t (advice lambda nil "Provide auditory feedback" ...)) bbdb-transpose-fields (emacspeak nil t (advice lambda nil "Provide auditory feedback" ...)) bbdb-complete-name (emacspeak nil t (advice lambda nil "Provide spoken feedback" ... ... ad-return-value)) around bbdb/vm-show-sender (emacspeak nil t (advice lambda nil "Provide spoken feedback" ...)) t bbdb/rmail-show-sender (emacspeak nil t (advice lambda nil "Provide spoken feedback" ...)) bbdb/mh-show-sender (emacspeak nil t (advice lambda nil "Provide spoken feedback" ...)) (bbdb bbdb-company bbdb-phones bbdb-name bbdb-net)] 5)
require(emacspeak-bbdb)
emacspeak-do-package-setup("bbdb" emacspeak-bbdb)
byte-code("\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A\"-H-A@ \"-HA-A B \"-HC-A D \"-HE-A F \"-HG-A H \"-HI-A \"-HJ-A K \"-HL-A M \"-HN-A O \"-HP-A Q \"-HR-A S \"-HT-A U \"-HV-A W \"-HX-A Y \"-HZ-A [ \"-H\\-A ] \"-H^-A _ \"-H`-A a \"-Hb-A c \"-Hd-A e \"-Hf-A g \"-Hh-A i \"-Hj-A k \"-Hl-A m \"-Hn-A o \"-Hp-A \"-Hq-A r \"-Hs-A t \"-Hu-A v \"-Hw-A x \"-Hy-A z \"-H{-A | \"-H}-A ~ \" \"" [emacspeak-do-package-setup "arc-mode" emacspeak-arc "bbdb" emacspeak-bbdb "bibtex" emacspeak-bibtex "bookmark" emacspeak-bookmark "buff-sel" emacspeak-buff-sel "c-mode" emacspeak-c "calc" emacspeak-calc "calendar" emacspeak-calendar "cc-mode" "compile" emacspeak-compile "cperl-mode" emacspeak-cperl "custom" emacspeak-custom "dired" emacspeak-dired "dismal" emacspeak-dismal "dmacro" emacspeak-dmacro "doctor" emacspeak-entertain "dunnet" "ediff" emacspeak-ediff "enriched" emacspeak-enriched "facemenu" emacspeak-facemenu "find-func" emacspeak-find-func "flyspell" emacspeak-flyspell "folding" emacspeak-folding "forms" emacspeak-forms "gnus" emacspeak-gnus "gomoku"] 3)
load("emacspeak")
load-library("emacspeak")
eval-buffer(#<buffer *load*> nil "emacspeak-setup")
load-with-code-conversion("/usr/local/share/emacs/site-lisp/emacspeak/emacspeak-setup.el" "emacspeak-setup" nil nil)
load("emacspeak-setup")
load-library("emacspeak-setup")
eval((load-library "emacspeak-setup"))
eval-last-sexp(t)
eval-print-last-sexp()
* call-interactively(eval-print-last-sexp)
--
****************************************
Koichi Inoue
Software Research Center, Ricoh Co. Ltd.
e-mail: kinoue@xxxxxxxxxxx
-----------------------------------------------------------------------------
To unsubscribe or change your address send mail to
"emacspeak-request@xxxxxxxxxxx" with a subject of "unsubscribe" or "help"
Emacspeak Files |
Subscribe |
Unsubscribe