# HG changeset patch # User Oleksandr Gavenko # Date 1481415166 -7200 # Node ID d6040290ee7830aed9c10652ff31226abda84ac6 # Parent 59bfd8195afa9bc86e1f3eab27801ca13ee63245 In case of parsing error do not display IPA headline. diff -r 59bfd8195afa -r d6040290ee78 contrib/gadict.el --- a/contrib/gadict.el Sun Dec 11 02:02:27 2016 +0200 +++ b/contrib/gadict.el Sun Dec 11 02:12:46 2016 +0200 @@ -282,6 +282,7 @@ (defvar gadict-espeak-program "espeak") (defvar gadict-espeak-program-ipa-args "-q --ipa=2") +;; "en" "en-gb" "en-us" "en-sc" (defvar gadict-espeak-voices-list '("en-gb" "en-us") "What voices to show. Look to 'espeak --voices' for full list.") @@ -309,7 +310,7 @@ (defun gadict-espeak-ipa-display () (when (eq major-mode 'gadict-mode) - (let ( (headword (gadict-nearest-headword)) ) + (let ( (headword (condition-case nil (gadict-nearest-headword) (error nil))) ) (unless (eq headword gadict-espeak-ipa-headword) (setq gadict-espeak-ipa-headword headword) (setq header-line-format (if headword (gadict-espeak-ipa-line headword) nil))