browse-url-with-browser-kind: Use strings for DEF

* lisp/net/browse-url.el (browse-url-with-browser-kind): Use
strings for DEF argument to completing-read (bug#81369).

Copyright-paperwork-exempt: yes
This commit is contained in:
Mark Hindley 2026-07-14 12:05:21 +01:00 committed by Sean Whitton
parent 4be321d511
commit afc5fc709b

View file

@ -988,8 +988,8 @@ opposite of the browser kind of `browse-url-browser-function'."
(default (if (eq (browse-url--browser-kind
browse-url-browser-function (car url-arg))
'internal)
'external
'internal))
"external"
"internal"))
(k (intern (completing-read
(format-prompt "Browser kind" default)
'(internal external)