awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

feature/lookup: properly report errors in +lookup/online

Browse Source
This commit is contained in:
Henrik Lissner
2018-01-20 21:44:18 -05:00
parent 1024cfa23c
commit f663123f5a
1 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
modules/feature/lookup/autoload/lookup.el
View File

@ -216,7 +216,7 @@ for the provider."
(region-end)))
(read-string "Search for: " (thing-at-point 'symbol t)))
(+lookup--online-provider current-prefix-arg)))
(condition-case _ex
(condition-case ex
(let ((url (cdr (assoc provider +lookup-provider-url-alist))))
(unless url
(error "'%s' is an invalid search engine" provider))
@ -227,7 +227,8 @@ for the provider."
(user-error "The search query is empty"))
(funcall +lookup-open-url-fn (format url (url-encode-url search))))
('error
(map-delete +lookup--last-provider major-mode))))
(map-delete +lookup--last-provider major-mode)
(message "Failed: %s" ex))))
;;;###autoload
(defun +lookup/online-select ()