Skip to content
Open
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion lib/voices.scm
Original file line number Diff line number Diff line change
Expand Up @@ -283,11 +283,11 @@ in the proclaim_voice description fields."
(setq languages (directory-entries dir t))
(while languages
(set! language (car languages))
(set! voice_proclaimed nil) ; flag to mark if proclaim_voice is found
(set! voices (directory-entries (path-append dir language) t))
(while voices
(set! voicedir (car voices))
(set! voice (path-basename voicedir))
(set! voice_proclaimed nil) ; flag to mark if proclaim_voice is found
(if (or (string-matches voicedir ".*\\..*")
(not (probe_file (path-append dir language voicedir "festvox" (string-append voicedir ".scm"))))
);; if directory is \.. or voice description doesn't exist, then do nothing. Else, load voice
Expand Down