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

Fix docstrings and method ordering in khoj.el

Browse Source
This commit is contained in:
Debanjum Singh Solanky
2023-03-27 18:33:09 +07:00
parent 5c2327ee4f
commit 83a7ccd729
1 changed files with 9 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -233,13 +233,13 @@ for example), set this to the full interpreter path."
:group 'khoj) :group 'khoj)
(defcustom khoj-auto-setup t (defcustom khoj-auto-setup t
"Automate install, configure and starting khoj server. "Automate install, configure and start of khoj server.
Auto invokes setup steps on calling main entrypoint." Auto invokes setup steps on calling main entrypoint."
:type 'string :type 'string
:group 'khoj) :group 'khoj)
(defvar khoj--server-process nil "Track Khoj server process.") (defvar khoj--server-process nil "Track khoj server process.")
(defvar khoj--server-name "*khoj-server*" "Track Khoj server buffer.") (defvar khoj--server-name "*khoj-server*" "Track khoj server buffer.")
(defvar khoj--server-ready? nil "Track if khoj server is ready to receive API calls.") (defvar khoj--server-ready? nil "Track if khoj server is ready to receive API calls.")
(defvar khoj--server-configured? t "Track if khoj server is configured to receive API calls.") (defvar khoj--server-configured? t "Track if khoj server is configured to receive API calls.")
(defvar khoj--progressbar '(🌑 🌘 🌗 🌖 🌕 🌔 🌓 🌒) "Track progress via moon phase animations.") (defvar khoj--progressbar '(🌑 🌘 🌗 🌖 🌕 🌔 🌓 🌒) "Track progress via moon phase animations.")
@@ -322,6 +322,12 @@ Auto invokes setup steps on calling main entrypoint."
(setq khoj--server-ready? t) (setq khoj--server-ready? t)
nil))) nil)))
(defun khoj--server-restart ()
"Restart the khoj server."
(interactive)
(khoj--server-stop)
(khoj--server-start))
(defun khoj--server-stop () (defun khoj--server-stop ()
"Stop the khoj server." "Stop the khoj server."
(interactive) (interactive)
@@ -330,12 +336,6 @@ Auto invokes setup steps on calling main entrypoint."
(kill-process khoj--server-process) (kill-process khoj--server-process)
(message "khoj.el: Stopped server."))) (message "khoj.el: Stopped server.")))
(defun khoj--server-restart ()
"Restart the khoj server."
(interactive)
(khoj--server-stop)
(khoj--server-start))
(defun khoj--server-setup () (defun khoj--server-setup ()
"Install and start the khoj server, if required." "Install and start the khoj server, if required."
(interactive) (interactive)