File: emacspeak-initialization

package info (click to toggle)
emacspeak 24-1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 9,092 kB
  • ctags: 4,597
  • sloc: xml: 54,699; lisp: 42,103; tcl: 1,799; makefile: 810; cpp: 603; sh: 566; ansic: 153; perl: 124
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)))

    ;;}}}