diff --git a/src/interface/emacs/khoj.el b/src/interface/emacs/khoj.el index 33f6edaf..2c8c2691 100644 --- a/src/interface/emacs/khoj.el +++ b/src/interface/emacs/khoj.el @@ -122,6 +122,19 @@ (let ((encoded-query (url-hexify-string query))) (format "%s/search?q=%s&t=%s" khoj--server-url encoded-query search-type))) +(defun query-khoj (beg end len) + (let ((query (minibuffer-contents))) + (message "t"))) + +(defun remove-khoj () + (remove-hook 'after-change-functions #'query-khoj)) + +(minibuffer-with-setup-hook + (lambda () + (add-hook 'after-change-functions #'query-khoj) + (add-hook 'minibuffer-exit-hook #'remove-khoj)) + (read-string "Query: ")) + ;;;###autoload (defun khoj (query) "Search your content naturally using the Khoj API"