[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 0d861f2 2/2: Fix reading kind argument in browse-url-with-browser
From: |
Tassilo Horn |
Subject: |
master 0d861f2 2/2: Fix reading kind argument in browse-url-with-browser-kind. |
Date: |
Fri, 8 May 2020 15:10:48 -0400 (EDT) |
branch: master
commit 0d861f25b288d23368cc7522eb56654724fd758d
Author: Tassilo Horn <address@hidden>
Commit: Tassilo Horn <address@hidden>
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 9073f89..f88de98 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