blob: 2fcd7438b2725dfb43572900dffb9a7441202570 (
plain)
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
|
diff --no-dereference --ignore-all-space --unified --recursive --text emacspeak.orig/lisp/emacspeak-preamble.el emacspeak.new/lisp/emacspeak-preamble.el
--- emacspeak.orig/lisp/emacspeak-preamble.el 2021-07-12 18:44:02.181914496 +0300
+++ emacspeak.new/lisp/emacspeak-preamble.el 2021-07-12 19:45:10.610814289 +0300
@@ -54,7 +54,7 @@
;;;###autoload
(defvar emacspeak-directory
- (expand-file-name "../" (file-name-directory load-file-name))
+ (file-name-as-directory "/usr/share/emacs/site-lisp/emacspeak/")
"emacspeak installation directory")
;;;###autoload
@@ -64,7 +64,7 @@
;;;###autoload
(defvar emacspeak-sounds-directory
- (expand-file-name "sounds/" emacspeak-directory)
+ (file-name-as-directory "/usr/share/sounds/emacspeak/")
"Auditory icons directory.")
;;;###autoload
diff --no-dereference --ignore-all-space --unified --recursive --text emacspeak.orig/servers/espeak emacspeak.new/servers/espeak
--- emacspeak.orig/servers/espeak 2021-07-12 18:44:02.147914519 +0300
+++ emacspeak.new/servers/espeak 2021-07-12 19:22:34.098431019 +0300
@@ -526,9 +526,7 @@
if {[info exists server_p]} {
set tts(input) sock0
}
-set servers [file dirname $argv0]
-set tclTTS $servers/native-espeak
-load $tclTTS/tclespeak[info sharedlibextension]
+load /usr/lib/emacspeak/tclespeak.so
if {[file exists /proc/asound]} {
set tts(play) /usr/bin/aplay
}
|