tools/lookup: declare gnutls-algorithm-priority early
Otherwise, gnutls-algorithm-priority won't be in scope for `dash-docs-read-json-from-url`.
This commit is contained in:
parent
bc501ef28e
commit
4002313e79
1 changed files with 3 additions and 0 deletions
|
@ -138,6 +138,9 @@ this list.")
|
||||||
dash-docs-min-length 2
|
dash-docs-min-length 2
|
||||||
dash-docs-browser-func #'eww)
|
dash-docs-browser-func #'eww)
|
||||||
|
|
||||||
|
;; Before `gnutls' is loaded, `gnutls-algorithm-priority' is treated as a
|
||||||
|
;; lexical variable, which breaks `+lookup*fix-gnutls-error'
|
||||||
|
(defvar gnutls-algorithm-priority)
|
||||||
(defun +lookup*fix-gnutls-error (orig-fn url)
|
(defun +lookup*fix-gnutls-error (orig-fn url)
|
||||||
"Fixes integer-or-marker-p errors emitted from Emacs' url library,
|
"Fixes integer-or-marker-p errors emitted from Emacs' url library,
|
||||||
particularly, the `url-retrieve-synchronously' call in
|
particularly, the `url-retrieve-synchronously' call in
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue