Replace obsolete functions/commands
This commit is contained in:
parent
ed2e7a65f6
commit
e204df3c05
9 changed files with 11 additions and 11 deletions
|
@ -44,6 +44,6 @@
|
|||
(mapcar #'car +lookup-search-url-alist)
|
||||
nil t)))
|
||||
(let ((url (cdr (assoc where +lookup-search-url-alist)))
|
||||
(search (or search (read-input "Query: "))))
|
||||
(search (or search (read-string "Query: "))))
|
||||
(browse-url (format url (url-encode-url search)))))
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue