contrib/gadict.el
changeset 887 05ca6cf71205
parent 862 8ce278ad45d8
child 925 79ac87d08976
equal deleted inserted replaced
886:fa0375773278 887:05ca6cf71205
    40 
    40 
    41 
    41 
    42 
    42 
    43 (defun gadict--espeak-cleanup (s)
    43 (defun gadict--espeak-cleanup (s)
    44   "Cleanup espeak IPA output."
    44   "Cleanup espeak IPA output."
    45   (replace-regexp-in-string "[\x200D]" "" (gadict--trim s)))
    45   (replace-regexp-in-string "t$(O*h(B" "$,1$G(B" (replace-regexp-in-string "[\x200D]" "" (gadict--trim s))))
    46 
    46 
    47 (defvar gadict-espeak-enabled nil
    47 (defvar gadict-espeak-enabled nil
    48   "Is espeak used.")
    48   "Is espeak used.")
    49 
    49 
    50 (defvar gadict-espeak-program "espeak")
    50 (defvar gadict-espeak-program "espeak")