From 0d861f25b288d23368cc7522eb56654724fd758d Mon Sep 17 00:00:00 2001 From: Tassilo Horn Date: Fri, 8 May 2020 21:07:56 +0200 Subject: Fix reading kind argument in browse-url-with-browser-kind. * lisp/net/browse-url.el (browse-url-with-browser-kind): Convert KIND argument queried from the user to a symbol. --- lisp/net/browse-url.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/lisp/net/browse-url.el b/lisp/net/browse-url.el index 9073f896831..f88de98fca7 100644 --- a/lisp/net/browse-url.el +++ b/lisp/net/browse-url.el @@ -950,11 +950,11 @@ opposite of the browser kind of `browse-url-browser-function'." 'internal) 'external 'internal)) - (k (completing-read - (format "Browser kind (default %s): " default) - '(internal external) - nil t nil nil - default))) + (k (intern (completing-read + (format "Browser kind (default %s): " default) + '(internal external) + nil t nil nil + default)))) (cons k url-arg))) (let ((function (browse-url-select-handler url kind))) (unless function -- cgit v1.2.1