[elpa] externals/kiwix 2619c65 5/5: Don't need command kiwix-at-point-interactive

[Stefan Monnier]

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

    Don't need command kiwix-at-point-interactive
---
 README.org |  4 ++--
 kiwix.el   | 26 +++++---------------------
 2 files changed, 7 insertions(+), 23 deletions(-)

diff --git a/README.org b/README.org
index ccf1369..e249fcd 100644
--- a/README.org
+++ b/README.org
@@ -82,7 +82,7 @@ 
https://chrome.google.com/webstore/detail/kiwix/donaljnlmapmngakoipdmehbfcioahhk
 (use-package kiwix
   :ensure t
   :after org
-  :commands (kiwix-launch-server kiwix-at-point-interactive)
+  :commands (kiwix-launch-server kiwix-at-point)
   :custom ((kiwix-server-use-docker t)
            (kiwix-server-port 8089)
            (kiwix-default-library "wikipedia_en_all_2016-02.zim"))
@@ -287,7 +287,7 @@ docker container ls --all | grep "kiwix-serve" | cat
 (use-package kiwix
   :ensure t
   :after org
-  :commands (kiwix-launch-server kiwix-at-point-interactive)
+  :commands (kiwix-launch-server kiwix-at-point)
   :init (require 'org-kiwix)
   (setq kiwix-server-use-docker t
               kiwix-server-port 8089
diff --git a/kiwix.el b/kiwix.el
index f3bf3b1..2251b86 100644
--- a/kiwix.el
+++ b/kiwix.el
@@ -39,8 +39,8 @@
 ;; (use-package kiwix
 ;;   :ensure t
 ;;   :after org
-;;   :commands (kiwix-launch-server kiwix-at-point-interactive)
-;;   :bind (:map document-prefix ("w" . kiwix-at-point-interactive))
+;;   :commands (kiwix-launch-server kiwix-at-point)
+;;   :bind (:map document-prefix ("w" . kiwix-at-point))
 ;;   :init (setq kiwix-server-use-docker t
 ;;               kiwix-server-port 8080
 ;;               kiwix-default-library "wikipedia_zh_all_2015-11.zim"))
@@ -182,12 +182,6 @@ Like in function `kiwix-ajax-search-hints'.")
   :safe #'stringp
   :group 'kiwix-mode)
 
-(defcustom kiwix-search-interactively t
-  "`kiwix-at-point' search interactively."
-  :type 'boolean
-  :safe #'booleanp
-  :group 'kiwix-mode)
-
 (defcustom kiwix-mode-prefix nil
   "Specify kiwix-mode keybinding prefix before loading."
   :type 'kbd
@@ -290,12 +284,9 @@ list and return a list result."
           (mapcar 'cdar data)))))
 
 ;;;###autoload
-(defun kiwix-at-point (&optional interactively)
-  "Search for the symbol at point with `kiwix-query'.
-
-Or When prefix argument `INTERACTIVELY' specified, then prompt
-for query string and library interactively."
-  (interactive "P")
+(defun kiwix-at-point ()
+  "Search for the symbol at point with `kiwix-query'."
+  (interactive)
   (unless (kiwix-ping-server)
     (kiwix-launch-server))
   (if kiwix-server-available?
@@ -340,13 +331,6 @@ for query string and library interactively."
     (warn "kiwix-serve is not available, please start it at first."))
   (setq kiwix-server-available? nil))
 
-;;;###autoload
-(defun kiwix-at-point-interactive ()
-  "Interactively input to query with kiwix."
-  (interactive)
-  (let ((current-prefix-arg t))
-    (call-interactively 'kiwix-at-point)))
-
 
;;===============================================================================
 
 (defun kiwix-mode-enable ()