Overlay/app-accessibility/festival/files/festival-2.1-init-scm.patch

25 lines
856 B
Diff

--- festival/lib/init.scm 2006-09-15 01:34:32.000000000 -0500
+++ festival/lib/init.scm 2006-09-15 01:50:30.000000000 -0500
@@ -52,8 +52,8 @@
;;; A chance to set various variables to a local setting e.g.
;;; lexdir, voices_dir audio etc etc.
-(if (probe_file (path-append libdir "sitevars.scm"))
- (load (path-append libdir "sitevars.scm")))
+(if (probe_file "/etc/festival/sitevars.scm")
+ (load "/etc/festival/sitevars.scm"))
;;; CSTR siod extensions
(require 'cstr)
@@ -133,8 +133,8 @@
;;;
;;; Local site initialization, if the file exists load it
;;;
-(if (probe_file (path-append libdir "siteinit.scm"))
- (load (path-append libdir "siteinit.scm")))
+(if (probe_file "/etc/festival/siteinit.scm")
+ (load "/etc/festival/siteinit.scm"))
;;; User initialization, if a user has a personal customization
;;; file loaded it