File: emacspeak-initialization

package info (click to toggle)
emacspeak 49.0%2Bdfsg-3
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 28,124 kB
  • sloc: lisp: 60,077; xml: 14,159; tcl: 1,332; cpp: 1,175; sh: 859; makefile: 754; python: 534; perl: 419
file content (35 lines) | stat: -rw-r--r-- 1,345 bytes parent folder | download | duplicates (10)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
Following is Raman's sample code to add to ~/.emacs to start
emacspeak.  File locations are different in a Debian system.  - Jim Van Zandt

emacspeak initialization...
Anyone who copies this blindly without bothering to
understand what it does will get what they deserve:-)

    ;;{{{ Load and customize emacspeak 

    
    (unless (featurep 'emacspeak)
      (load-file
       (expand-file-name "~/emacs/lisp/emacspeak/emacspeak-setup.el")))
    
    (when (featurep 'emacspeak)
      (declare (special emacspeak-play-program emacspeak-play-args
                        emacspeak-auditory-icon-function
                        dtk-default-speech-rate))
      (if (file-exists-p "/usr/demo/SOUND/play")
          (setq
           emacspeak-play-program "/usr/demo/SOUND/play"
           emacspeak-play-args "-i"
           emacspeak-auditory-icon-function
           'emacspeak-play-auditory-icon))
      (if (file-exists-p "/usr/bin/audioplay")
          (setq
           emacspeak-play-program "/usr/bin/audioplay"
           emacspeak-play-args "-i"
           emacspeak-auditory-icon-function 'emacspeak-play-auditory-icon))
      (setq dtk-default-speech-rate 485)
      (emacspeak-pronounce-load-dictionaries "~/.emacspeak/.dictionary")
      (dtk-set-rate 480 t)
      (unless blackdog-p (emacspeak-toggle-auditory-icons t)))

    ;;}}}