Blob Blame History Raw
diff -urN festival.orig/lib/alias_cmu_to_nitech.scm festival/lib/alias_cmu_to_nitech.scm
--- festival.orig/lib/alias_cmu_to_nitech.scm	1969-12-31 19:00:00.000000000 -0500
+++ festival/lib/alias_cmu_to_nitech.scm	2007-03-14 23:31:43.000000000 -0400
@@ -0,0 +1,39 @@
+;
+; This file is trivial and I make no claims of copyright. However, I should 
+; certainly credit Nickolay V. Shmyrev, who sent me a snippet of code on
+; which this is based.
+;                     -- Matthew Miller <mattdm@mattdm.org>
+;
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;;;
+;;; Make aliases for cmu_us_*_arctic_hts voices previously shipped with
+;;; Fedora which are now replaced by the nitech_us_*_arctic_hts versions
+;;; of the same voices.
+;;;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(if (and (member 'nitech_us_awb_arctic_hts (voice.list))
+         (not (member 'cmu_us_awb_arctic_hts (voice.list))))
+ (define (voice_cmu_us_awb_arctic_hts)
+    (voice_nitech_us_awb_arctic_hts)
+    'cmu_us_awb_arctic_hts))
+
+(if (and (member 'nitech_us_bdl_arctic_hts (voice.list))
+         (not (member 'cmu_us_bdl_arctic_hts (voice.list))))
+ (define (voice_cmu_us_bdl_arctic_hts)
+    (voice_nitech_us_bdl_arctic_hts)
+    'cmu_us_bdl_arctic_hts))
+
+(if (and (member 'nitech_us_jmk_arctic_hts (voice.list))
+         (not (member 'cmu_us_jmk_arctic_hts (voice.list))))
+ (define (voice_cmu_us_jmk_arctic_hts)
+    (voice_nitech_us_jmk_arctic_hts)
+    'cmu_us_jmk_arctic_hts))
+
+(if (and (member 'nitech_us_slt_arctic_hts (voice.list))
+         (not (member 'cmu_us_slt_arctic_hts (voice.list))))
+ (define (voice_cmu_us_slt_arctic_hts)
+    (voice_nitech_us_slt_arctic_hts)
+    'cmu_us_slt_arctic_hts))
+
diff -urN festival.orig/lib/init.scm festival/lib/init.scm
--- festival.orig/lib/init.scm	2007-03-14 23:26:07.000000000 -0400
+++ festival/lib/init.scm	2007-03-14 23:32:44.000000000 -0400
@@ -128,6 +128,10 @@
 (require 'voices)  ;; sets voice_default
 (require 'languages)
 
+;;; Aliases for the CMU voices previously shipped 
+;;; with Fedora (now replaced by Nitech versions)
+(require 'alias_cmu_to_nitech)
+
 ;;; Some higher level functions
 (require 'token)
 (require 'tts)