Fix reference to old +lookup-symbol-or-region

Was replaced with doom-thing-at-point-or-region in 27bf3c85b
This commit is contained in:
Henrik Lissner
2020-01-25 16:03:10 -05:00
parent 57f550bc85
commit 7cf197d8ae

View File

@ -35,7 +35,7 @@ provider from `+lookup-provider-url-alist'. On consecutive uses, the last
provider will be reused. If the universal argument is supplied, always prompt provider will be reused. If the universal argument is supplied, always prompt
for the provider." for the provider."
(interactive (interactive
(list (if (use-region-p) (+lookup-symbol-or-region)) (list (if (use-region-p) (doom-thing-at-point-or-region))
(+lookup--online-provider current-prefix-arg))) (+lookup--online-provider current-prefix-arg)))
(let ((backend (cl-find-if (lambda (x) (or (stringp x) (fboundp x))) (let ((backend (cl-find-if (lambda (x) (or (stringp x) (fboundp x)))
(cdr (assoc provider +lookup-provider-url-alist))))) (cdr (assoc provider +lookup-provider-url-alist)))))