klbr/khoj
1
0
Fork 0
mirror of https://github.com/khoaliber/khoj.git synced 2026-03-03 13:19:16 +00:00
Code Issues Packages Projects Releases Wiki Activity

Use post-command-hook to only query on user input

Browse Source 
- Hooking into after-change-functions results in system logs triggering query
This commit is contained in:
Debanjum Singh Solanky
2022-07-27 05:41:22 +04:00
parent 0d49398954
commit bfcb962cbe
1 changed files with 9 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
src/interface/emacs/khoj.el
View File

@@ -153,20 +153,19 @@
(read-only-mode t)))
;; Incremental Search on Khoj
(defun khoj--incremental-query (beg end len)
(let* ((in-khoj-prompt (equal (minibuffer-prompt) khoj--query-prompt))
(search-type "org")
(defun khoj--incremental-query ()
(let* ((search-type "org")
(buffer-name (get-buffer-create (format "*Khoj (t:%s)*" search-type)))
(query (minibuffer-contents-no-properties))
(query-url (khoj--construct-api-query query search-type)))
(khoj--query-api-and-render-results
query
search-type
query-url
buffer-name)))
query
search-type
query-url
buffer-name)))
(defun khoj--remove-incremental-query ()
(remove-hook 'after-change-functions #'khoj--incremental-query)
(remove-hook 'post-command-hook #'khoj--incremental-query)
(remove-hook 'minibuffer-exit-hook #'khoj--remove-incremental-query))
;;;###autoload
@@ -179,8 +178,8 @@
(switch-to-buffer buffer-name)
(minibuffer-with-setup-hook
(lambda ()
(add-hook 'after-change-functions #'khoj--incremental-query)
(add-hook 'minibuffer-exit-hook #'khoj--remove-incremental-query))
(add-hook 'post-command-hook #'khoj--incremental-query nil 'local)
(add-hook 'minibuffer-exit-hook #'khoj--remove-incremental-query nil 'local))
(read-string khoj--query-prompt))))
;;;###autoload