--- a/contrib/gadict.el	Thu Sep 28 00:18:16 2017 +0300
+++ b/contrib/gadict.el	Wed Oct 04 21:22:27 2017 +0300
@@ -42,7 +42,13 @@
 
 (defun gadict--espeak-cleanup (s)
   "Cleanup espeak IPA output."
-  (replace-regexp-in-string "t$(O*h(B" "$,1$G(B" (replace-regexp-in-string "[\x200D]" "" (gadict--trim s))))
+  (mapc (lambda (fn) (setq s (funcall fn s)))
+        (list
+         ;; UTF symbol between t$(O*h(B to make ligature.
+         (lambda (str) (replace-regexp-in-string "[\x200D]" "" str))
+         (lambda (str) (replace-regexp-in-string "t$(O*h(B" "$,1$G(B" str))
+         #'gadict--trim))
+  s)
 
 (defvar gadict-espeak-enabled nil
   "Is espeak used.")