emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/ellama 6bc04eff78 02/11: Deactivate session on session


From: ELPA Syncer
Subject: [elpa] externals/ellama 6bc04eff78 02/11: Deactivate session on session buffer kill
Date: Thu, 18 Jan 2024 15:57:52 -0500 (EST)

branch: externals/ellama
commit 6bc04eff78ad1aacc77975c59a45153916d2dcfe
Author: Sergey Kostyaev <sskostyaev@gmail.com>
Commit: Sergey Kostyaev <sskostyaev@gmail.com>

    Deactivate session on session buffer kill
---
 ellama.el | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/ellama.el b/ellama.el
index 9933de0aa9..315fc24ab5 100644
--- a/ellama.el
+++ b/ellama.el
@@ -367,6 +367,16 @@ PROMPT is a variable contains last prompt in this session."
 
 (advice-add #'keyboard-quit :before #'ellama--cancel-current-request)
 
+(defun ellama--session-deactivate (&rest _)
+  "Deactivate current session."
+  (when ellama--current-session
+    (let ((id (ellama-session-id ellama--current-session)))
+      (when (equal ellama--current-session-id id)
+       (setq ellama--current-session-id nil))
+      (remhash id ellama--active-sessions))))
+
+(advice-add #'kill-buffer :before #'ellama--session-deactivate)
+
 (defun ellama-stream (prompt &rest args)
   "Query ellama for PROMPT.
 ARGS contains keys for fine control.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]