Remove timeout for ask_user tool

The ask_user tool should wait indefinitely for user response rather
than timing out after 5 minutes. Users may be away or thinking.

🤖 Generated with [eca](https://eca.dev)

Co-Authored-By: eca-agent <git@eca.dev>

Author: ericdallo

CHANGELOG.md

@@ -4,6 +4,7 @@
 
 - Support `ask_user` tool allowing LLM to ask the user questions with optional selectable options. #338
 - Remove redundant system message when background jobs finish or are killed.
+- Remove timeout for `ask_user` tool so it waits indefinitely for user response.
 
 ## 0.126.0
 

src/eca/features/tools/ask_user.clj

@@ -8,17 +8,15 @@
 (set! *warn-on-reflection* true)
 
 (def ^:private logger-tag "[TOOLS-USER]")
-(def ^:private default-timeout-seconds 300)
 
 (defn ^:private ask-user
-  [arguments {:keys [messenger config chat-id tool-call-id]}]
+  [arguments {:keys [messenger chat-id tool-call-id]}]
   (let [question (get arguments "question")
         options (get arguments "options")
         allow-freeform (get arguments "allowFreeform" true)]
     (if (or (nil? question) (string/blank? question))
       (tools.util/single-text-content "INVALID_ARGS: `question` is required and must not be blank." :error)
-      (let [timeout-ms (* 1000 (get config :askQuestionTimeoutSeconds default-timeout-seconds))
-            params (cond-> {:chatId chat-id
+      (let [params (cond-> {:chatId chat-id
                             :question question
                             :allowFreeform allow-freeform}
                      (seq options) (assoc :options options)
@@ -28,15 +26,9 @@
                                            {:chat-id chat-id
                                             :role :system
                                             :content {:type :progress :state :running :text "Waiting answer"}})
-          (let [response (deref (messenger/ask-question messenger params) timeout-ms ::timeout)]
-            (cond
-              (= response ::timeout)
-              (tools.util/single-text-content "Timeout waiting for user response." :error)
-
-              (:cancelled response)
+          (let [response @(messenger/ask-question messenger params)]
+            (if (:cancelled response)
               (tools.util/single-text-content "User cancelled the question." :error)
-
-              :else
               (tools.util/single-text-content (str "User answered: " (:answer response)))))
           (catch Exception e
             (logger/error logger-tag "Error asking user question: %s" (ex-message e))

test/eca/features/tools/ask_user_test.clj

@@ -60,16 +60,6 @@
                       :text "User cancelled the question."}]}
          (call-ask-user {"question" "Which framework?"})))))
 
-(deftest ask-user-timeout-test
-  (testing "Timeout waiting for user response"
-    (reset! (:ask-question-response* (h/messenger)) :block)
-    (is (match?
-         {:error true
-          :contents [{:type :text
-                      :text "Timeout waiting for user response."}]}
-         (call-ask-user {"question" "Which framework?"}
-                        {:config {:askQuestionTimeoutSeconds 0}})))))
-
 (deftest ask-user-missing-question-test
   (testing "Missing question parameter"
     (is (match?