about summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--kaagum/tea.scm6
1 files changed, 1 insertions, 5 deletions
diff --git a/kaagum/tea.scm b/kaagum/tea.scm
index 12d455c..749abb9 100644
--- a/kaagum/tea.scm
+++ b/kaagum/tea.scm
@@ -525,11 +525,7 @@ in @code{tea-loop}."
                                           (put state-requests-alist
                                                '()
                                                <>))))
-                 (state-return
-                  (list (acp-message `(("jsonrpc" . "2.0")
-                                       ("id" . ,request-id)
-                                       ("result"
-                                        ("stopReason" . "cancelled")))))))))))))))
+                 (end-turn-effects session-id models "cancelled"))))))))))
 
 (define (client-response-effects response)
   "Return the state-monadic list of effects for a new ACP @var{response}."