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
|
Author: Giuseppe Iuculano <giuseppe@iuculano.it>
Description: fix italian_scm/ and synthesis.scm path
--- a/festival/lib/italian_require.scm
+++ b/festival/lib/italian_require.scm
@@ -1,8 +1,8 @@
;; ADD italian_scm to the path
-(set! lib_scm_dir (path-append libdir "italian_scm/"))
+(set! lib_scm_dir (path-append datadir "italian_scm/"))
(set! load-path (cons lib_scm_dir load-path))
-(set! synthesis_reset_file (path-append libdir "synthesis.scm"))
+(set! synthesis_reset_file (path-append datadir "synthesis.scm"))
;; Load any common required files
(require 'italian_phoneset)
--- a/festival/lib/italian_scm/italian_mbrola.scm
+++ b/festival/lib/italian_scm/italian_mbrola.scm
@@ -63,7 +63,7 @@
;; mbrola database.
(if (getenv 'MBROLA_DBS)
(defvar mbrola_dbs (getenv 'MBROLA_DBS))
- (defvar mbrola_dbs (path-append libdir "voices/italian/italian/"))
+ (defvar mbrola_dbs (path-append datadir "voices/italian/italian/"))
)
;; The following is unusefull, 'cause it always
;; returns mbrola_dbs
|