diff --git a/emacs/.emacs.d/config/init-llm.el b/emacs/.emacs.d/config/init-llm.el index 9c7522f..6594c49 100644 --- a/emacs/.emacs.d/config/init-llm.el +++ b/emacs/.emacs.d/config/init-llm.el @@ -9,6 +9,12 @@ llm-set-model llm-prompt llm-prompt-buffer - llm-prompt-region)) + llm-prompt-region) + :config + (add-to-list 'display-buffer-alist '("\\*llm-.*\\*" + (display-buffer-reuse-mode-window + display-buffer-pop-up-window))) + :custom + (llm-model "nous-hermes-llama2-13b")) (provide 'init-llm) diff --git a/emacs/.emacs.d/packages/llm/llm.el b/emacs/.emacs.d/packages/llm/llm.el index 39c593d..cdfacf7 100644 --- a/emacs/.emacs.d/packages/llm/llm.el +++ b/emacs/.emacs.d/packages/llm/llm.el @@ -156,6 +156,7 @@ The process is named NAME and runs in BUFFER-NAME." (switch-to-buffer "*llm-prompt-buffer*"))) (defun llm-prompt-region (query) + "Prompt llm with the contents of the region and the QUERY." (interactive "sQuery: ") (let ((extra-args (list "-s" (buffer-substring-no-properties (region-beginning) (region-end))))) (apply #'llm--run-async