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

Support querying all text search types in incremental search

Browse Source 
- Before incremental search was hard-coded to only query org
This commit is contained in:
Debanjum Singh Solanky
2022-07-27 06:13:04 +04:00
parent bfcb962cbe
commit ad242cafa7
1 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -49,6 +49,9 @@
(defconst khoj--query-prompt "Khoj: " (defconst khoj--query-prompt "Khoj: "
"Query prompt shown to user in the minibuffer.") "Query prompt shown to user in the minibuffer.")
(defvar khoj--search-type "org"
"The type of content to perform search on.")
(defun khoj--extract-entries-as-markdown (json-response query) (defun khoj--extract-entries-as-markdown (json-response query)
"Convert json response from API to markdown entries" "Convert json response from API to markdown entries"
;; remove leading (, ) or SPC from extracted entries string ;; remove leading (, ) or SPC from extracted entries string
@@ -154,7 +157,7 @@
;; Incremental Search on Khoj ;; Incremental Search on Khoj
(defun khoj--incremental-query () (defun khoj--incremental-query ()
(let* ((search-type "org") (let* ((search-type khoj--search-type)
(buffer-name (get-buffer-create (format "*Khoj (t:%s)*" search-type))) (buffer-name (get-buffer-create (format "*Khoj (t:%s)*" search-type)))
(query (minibuffer-contents-no-properties)) (query (minibuffer-contents-no-properties))
(query-url (khoj--construct-api-query query search-type))) (query-url (khoj--construct-api-query query search-type)))
@@ -175,6 +178,7 @@
(let* ((default-type (khoj--buffer-name-to-search-type (buffer-name))) (let* ((default-type (khoj--buffer-name-to-search-type (buffer-name)))
(search-type (completing-read "Type: " '("org" "markdown" "ledger" "music") nil t default-type)) (search-type (completing-read "Type: " '("org" "markdown" "ledger" "music") nil t default-type))
(buffer-name (get-buffer-create (format "*Khoj (t:%s)*" search-type)))) (buffer-name (get-buffer-create (format "*Khoj (t:%s)*" search-type))))
(setq khoj--search-type search-type)
(switch-to-buffer buffer-name) (switch-to-buffer buffer-name)
(minibuffer-with-setup-hook (minibuffer-with-setup-hook
(lambda () (lambda ()