Henrik Lissner 2022-01-04 20:59:28 +01:00
parent 7832424843
commit 2a515c683a
2 changed files with 1 additions and 10 deletions

View file

@ -215,15 +215,6 @@ Dictionary.app behind the scenes to get definitions.")
:unless IS-MAC
:defer t
:config
;; REVIEW Temporarily fix abo-abo/define-word#31
(defadvice! +lookup--fix-define-word-a (fn &rest args)
"Fix `define-word' backends that require a user agent (like wordnik)."
:around #'define-word
(let ((url-request-extra-headers
'(("User-Agent" .
"Mozilla/5.0 (Macintosh; Intel Mac OS X 11_5_2) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/93.0.4577.63 Safari/537.36"))))
(apply fn args)))
(setq define-word-displayfn-alist
(cl-loop for (service . _) in define-word-services
collect (cons service #'+eval-display-results-in-popup))))

View file

@ -27,7 +27,7 @@
(when (featurep! +dictionary)
(if IS-MAC
(package! osx-dictionary :pin "1a4479d9f44ef1e6e5f7643c172c32f6fe6cce21")
(package! define-word :pin "6e4a427503aef096484f88332962c346cdd10847")
(package! define-word :pin "31a8c67405afa99d0e25e7c86a4ee7ef84a808fe")
(package! powerthesaurus :pin "02c9d11a3f407023aa7c7b080bb9f8a5f5e7cd7a")
(when (featurep! +offline)
(package! wordnut :pin "feac531404041855312c1a046bde7ea18c674915")