emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

bump: :tools lookup

Browse source 
abo-abo/define-word@6e4a427503 -> abo-abo/define-word@31a8c67405

Ref: abo-abo/define-word#31
This commit is contained in:
Henrik Lissner 2022-01-04 20:59:28 +01:00
parent 7832424843
commit 2a515c683a
2 changed files with 1 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

9
modules/tools/lookup/config.el
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))))