branch: externals/ellama
commit f22a21dd56f6646d26593bf5908ca11ae32164f7
Author: stardiviner <[email protected]>
Commit: stardiviner <[email protected]>
Add spinner support as mode-line progress indicator
---
ellama.el | 9 ++++++---
1 file changed, 6 insertions(+), 3 deletions(-)
diff --git a/ellama.el b/ellama.el
index d3d8e4c075..5985f0b797 100644
--- a/ellama.el
+++ b/ellama.el
@@ -5,7 +5,7 @@
;; Author: Sergey Kostyaev <[email protected]>
;; URL: http://github.com/s-kostyaev/ellama
;; Keywords: help local tools
-;; Package-Requires: ((emacs "28.1"))
+;; Package-Requires: ((emacs "28.1") (spinner "1.7.4"))
;; Version: 0.1.0
;; Created: 8th Oct 2023
@@ -31,6 +31,7 @@
;;; Code:
(require 'json)
+(require 'spinner)
(defgroup ellama nil
"Ollama client for Emacs."
@@ -200,7 +201,8 @@ default. Default value is `ellama-template'."
(with-current-buffer (process-buffer proc)
(save-excursion
(goto-char (point-max))
- (insert "\n\n")))))
+ (insert "\n\n"))
+ (spinner-stop))))
(lambda (_ _) nil))))
(with-current-buffer buffer
(setq ellama--request (list :model model :prompt prompt))
@@ -222,7 +224,8 @@ default. Default value is `ellama-template'."
"-X" "POST" ellama-url "-d"
(json-encode-plist ellama--request))
:filter 'ellama--filter
- :sentinel sentinel)))))
+ :sentinel sentinel)
+ (spinner-start 'progress-bar)))))
;;;###autoload
(defun ellama-ask ()
