emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/kiwix 5f60967 013/192: use browse-url to replace custom


From: Stefan Monnier
Subject: [elpa] externals/kiwix 5f60967 013/192: use browse-url to replace custom browser custom
Date: Sat, 19 Dec 2020 00:41:23 -0500 (EST)

branch: externals/kiwix
commit 5f60967f4ac83eb1d6b7a63b6f6ec3668e4171dc
Author: stardiviner <numbchild@gmail.com>
Commit: stardiviner <numbchild@gmail.com>

    use browse-url to replace custom browser custom
---
 kiwix.el | 9 ++-------
 1 file changed, 2 insertions(+), 7 deletions(-)

diff --git a/kiwix.el b/kiwix.el
index a6802f7..7fde947 100644
--- a/kiwix.el
+++ b/kiwix.el
@@ -12,10 +12,6 @@
   "kiwix group."
   :group 'custom-group)
 
-(defcustom kiwix-browser "google-chrome-stable"
-  "Specify browser for Kiwix visiting."
-  :group 'kiwix)
-
 (defcustom kiwix-default-library "wikipedia_en_all_2016-02"
   "Specify the default Kiwix library you want to search."
   :group 'kiwix)
@@ -38,11 +34,10 @@
 
 (defun kiwix-query (query)
   "Search `QUERY' with Kiwix."
-  (let* ((browser kiwix-browser)
-         (kiwix-server "http://127.0.0.1:8000/";)
+  (let* ((kiwix-server "http://127.0.0.1:8000/";)
          (kiwix-library kiwix-default-library)
          (url (concat kiwix-server kiwix-library "/A/" (capitalize query) 
".html")))
-    (shell-command (concat browser " " url))))
+    (browse-url url)))
 
 ;;;###autoload
 (defun kiwix-at-point (&optional input)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]