From 49eec4b8aefdab01f51eaa22bf7f2b454655a76b Mon Sep 17 00:00:00 2001 From: Amr Gharbeia Date: Fri, 8 May 2026 21:05:58 -0400 Subject: [PATCH] =?UTF-8?q?fix:=20add=20/eval=20back=20to=20/help=20listin?= =?UTF-8?q?g=20=E2=80=94=20resolves=20flake?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit test-on-key-help checked for /eval in help output. The rewritten help list dropped /eval which is still a working command. Fixed by adding it as the first entry. TUI Main: 98/98 --- lisp/channel-tui-main.lisp | 1 + org/channel-tui-main.org | 1 + 2 files changed, 2 insertions(+) diff --git a/lisp/channel-tui-main.lisp b/lisp/channel-tui-main.lisp index cd1ccb4..17c3ad9 100644 --- a/lisp/channel-tui-main.lisp +++ b/lisp/channel-tui-main.lisp @@ -336,6 +336,7 @@ (let ((topic (string-trim '(#\Space) (subseq text 6)))) (add-msg :system (format nil "Topic: ~a — use read-file to query USER_MANUAL.org" topic)))) ((string-equal text "/help") + (add-msg :system "/eval Evaluate Lisp") (add-msg :system "/undo Undo last operation") (add-msg :system "/redo Redo last operation") (add-msg :system "/why Show last gate trace") diff --git a/org/channel-tui-main.org b/org/channel-tui-main.org index 8d2f5e0..d1a46f1 100644 --- a/org/channel-tui-main.org +++ b/org/channel-tui-main.org @@ -370,6 +370,7 @@ Event handlers + daemon I/O + main loop. (let ((topic (string-trim '(#\Space) (subseq text 6)))) (add-msg :system (format nil "Topic: ~a — use read-file to query USER_MANUAL.org" topic)))) ((string-equal text "/help") + (add-msg :system "/eval Evaluate Lisp") (add-msg :system "/undo Undo last operation") (add-msg :system "/redo Redo last operation") (add-msg :system "/why Show last gate trace")