From 1024cfa23cbad029dc764a57cef93e17657b65b0 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Sat, 20 Jan 2018 21:43:23 -0500 Subject: [PATCH] feature/lookup: fix invalid search engine error in +lookup/online Caused because map-put returns the full provider cons cell, rather than just the provider. --- modules/feature/lookup/autoload/lookup.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/modules/feature/lookup/autoload/lookup.el b/modules/feature/lookup/autoload/lookup.el index 04896f3dc..8ff263aca 100644 --- a/modules/feature/lookup/autoload/lookup.el +++ b/modules/feature/lookup/autoload/lookup.el @@ -14,7 +14,8 @@ "Search on: " (mapcar #'car +lookup-provider-url-alist) nil t))) - (map-put +lookup--last-provider key provider))))) + (map-put +lookup--last-provider key provider) + provider)))) (defun +lookup--symbol-or-region (&optional initial) (cond (initial)