From 2d606d0620d46cf2e87483fc964807fd595022bd Mon Sep 17 00:00:00 2001 From: ajet Date: Tue, 22 Sep 2026 06:24:04 -0900 Subject: [PATCH] get agent to use current state --- src/tbd/agent/instructions.clj | 6 ++++-- ui/src/tbd/ui/events.cljs | 2 +- 2 files changed, 5 insertions(+), 3 deletions(-) diff --git a/src/tbd/agent/instructions.clj b/src/tbd/agent/instructions.clj index bcd7f17..132d07e 100644 --- a/src/tbd/agent/instructions.clj +++ b/src/tbd/agent/instructions.clj @@ -46,8 +46,10 @@ (seq tools) (str (if page " Its" "\n\nYour") " tools: " (str/join ", " (map :name tools)) ". The tools of other pages are offered once you navigate there.") - (seq state) (str "\n\nCurrent state of the page (JSON), already up to date as of this message — " - "never call a tool just to read it, only to act:\n" (json/write-value-as-string state)))) + (seq state) (str "\n\nCurrent state of the page (JSON), refreshed on every message you get, so it is\n" + "always current, more current than anything said earlier in this conversation, a tool\n" + "result marked out of date, or what you said before — never call a tool just to read it,\n" + "only to act:\n" (json/write-value-as-string state)))) (defn a2a "The A2A server's system prompt: an outside agent calling this app directly, not through a diff --git a/ui/src/tbd/ui/events.cljs b/ui/src/tbd/ui/events.cljs index 1e68903..136fc32 100644 --- a/ui/src/tbd/ui/events.cljs +++ b/ui/src/tbd/ui/events.cljs @@ -382,7 +382,7 @@ (def ^:private stale-result "What the LLM is sent in place of a result from before the user's last message." - "(out of date: this was read on an earlier turn and the page may have changed since. Call the tool again for the current state.)") + "(out of date: this was read on an earlier turn and the page may have changed since. Use \"Current state of the page\" below, if there is one, or call the tool again, for what it shows now.)") (defn- without-stale-results "`messages` with the content of the tool results from before the user's last message replaced by