From f6ff7b1beb07b9c0a25da8406b435bbbbf3ae3f7 Mon Sep 17 00:00:00 2001 From: Debanjum Singh Solanky Date: Sun, 26 Mar 2023 05:28:44 +0700 Subject: [PATCH] Render foonote reference links as superscript for Khoj Chat on Emacs --- src/interface/emacs/khoj.el | 25 ++++++++++++++++++------- 1 file changed, 18 insertions(+), 7 deletions(-) diff --git a/src/interface/emacs/khoj.el b/src/interface/emacs/khoj.el index 239ac9bf..db22a521 100644 --- a/src/interface/emacs/khoj.el +++ b/src/interface/emacs/khoj.el @@ -360,13 +360,24 @@ Render results in BUFFER-NAME using QUERY, CONTENT-TYPE." (mapcar #'khoj--render-chat-response) ;; insert chat messages into Khoj Chat Buffer (mapc #'insert)) - (progn (org-mode) - (visual-line-mode) - (khoj--add-hover-text-to-footnote-refs (point-min)) - (use-local-map (copy-keymap org-mode-map)) - (local-set-key (kbd "m") #'khoj--chat) - (local-set-key (kbd "C-x m") #'khoj--chat) - (read-only-mode t))))) + (progn + (khoj--add-hover-text-to-footnote-refs (point-min)) + + ;; render reference footnotes as superscript + (setq-local + org-use-sub-superscripts '{} + org-pretty-entities-include-sub-superscripts t + org-pretty-entities t) + + ;; create khoj chat shortcut keybindings + (use-local-map (copy-keymap org-mode-map)) + (local-set-key (kbd "m") #'khoj--chat) + (local-set-key (kbd "C-x m") #'khoj--chat) + + ;; enable appropriate khoj chat major, minor modes + (org-mode) + (visual-line-mode) + (read-only-mode t))))) (defun khoj--add-hover-text-to-footnote-refs (start-pos) "Show footnote defs on mouse hover on footnote refs from START-POS."