diff --git a/lisp/channel-tui-main.lisp b/lisp/channel-tui-main.lisp
index a5269ea..2066161 100644
--- a/lisp/channel-tui-main.lisp
+++ b/lisp/channel-tui-main.lisp
@@ -303,18 +303,22 @@
                    (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
-                    "/focus <proj>  Set project context")
-                   (add-msg :system
-                    "/scope <s>     Change scope (memex/session/project)")
-                   (add-msg :system
-                    "/unfocus       Pop context stack")
-                   (add-msg :system
-                    "/theme         Show current color theme")
-                   (add-msg :system
-                    "/help          Show this help")
-                   (add-msg :system
-                    "\\ + Enter      Multi-line input"))
+                   (add-msg :system "/undo          Undo last operation")
+                   (add-msg :system "/redo          Redo last operation")
+                   (add-msg :system "/why           Show last gate trace")
+                   (add-msg :system "/identity      Edit IDENTITY.org")
+                   (add-msg :system "/tags          List tag severities")
+                   (add-msg :system "/audit <id>    Inspect memory object")
+                   (add-msg :system "/search <q>    Search messages")
+                   (add-msg :system "/context       Show context summary")
+                   (add-msg :system "/rewind <n>    Rewind to snapshot N")
+                   (add-msg :system "/sessions      Show snapshots")
+                   (add-msg :system "/resume <n>    Resume from snapshot")
+                   (add-msg :system "/focus <proj>  Set project context")
+                   (add-msg :system "/theme         Show theme")
+                   (add-msg :system "/help [topic]  Show this help")
+                   (add-msg :system "\\ + Enter      Multi-line input")
+                   (add-msg :system "Ctrl+G         Toggle gate trace"))
                   ;; /theme command
                    ((string-equal text "/theme")
                     (add-msg :system (format nil "Theme: ~a — user=~a agent=~a system=~a input=~a"