fix wrong argument order in usage of alist-get

This commit is contained in:
Wang Hao 2018-07-02 11:05:10 +08:00
parent 637131a264
commit 1ce3bedbbb

View file

@ -73,7 +73,7 @@ properties:
"Search on: " "Search on: "
(mapcar #'car +lookup-provider-url-alist) (mapcar #'car +lookup-provider-url-alist)
nil t))) nil t)))
(setf (alist-get +lookup--last-provider key) provider) (setf (alist-get key +lookup--last-provider) provider)
provider)))) provider))))
(defun +lookup--symbol-or-region (&optional initial) (defun +lookup--symbol-or-region (&optional initial)