doom*dash-docs-read-json-from-url -> +lookup*fix-gnutls-error

Conform to naming conventions.
This commit is contained in:
Henrik Lissner 2019-05-15 23:50:29 -04:00
parent 0c243e6d5c
commit bc501ef28e
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -138,16 +138,16 @@ this list.")
dash-docs-min-length 2
dash-docs-browser-func #'eww)
;; Fixes integer-or-marker-p errors emitted from Emacs' url library,
;; particularly, the `url-retrieve-synchronously' call in
;; `dash-docs-read-json-from-url'. This is part of a systemic issue with Emacs
;; 26's networking library (fixed in Emacs 27+, apparently).
;;
;; See https://github.com/magit/ghub/issues/81
(defun doom*dash-docs-read-json-from-url (orig-fn url)
(defun +lookup*fix-gnutls-error (orig-fn url)
"Fixes integer-or-marker-p errors emitted from Emacs' url library,
particularly, the `url-retrieve-synchronously' call in
`dash-docs-read-json-from-url'. This is part of a systemic issue with Emacs 26's
networking library (fixed in Emacs 27+, apparently).
See https://github.com/magit/ghub/issues/81"
(let ((gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3"))
(funcall orig-fn url)))
(advice-add #'dash-docs-read-json-from-url :around #'doom*dash-docs-read-json-from-url)
(advice-add #'dash-docs-read-json-from-url :around #'+lookup*fix-gnutls-error)
(def-package! helm-dash
:when (featurep! :completion helm))