fix(protocol): Whitelist :STATUS message type in schema validator

2026-04-19 12:26:44 -04:00
parent b867c8066f
commit 65d230e502
2 changed files with 2 additions and 2 deletions
--- a/skills/org-skill-protocol-validator.org
+++ b/skills/org-skill-protocol-validator.org
@@ -54,7 +54,7 @@ Decouple protocol parsing (framing/unframing) from semantic validation.
    (error "Communication Protocol Schema Error: Message must be a property list (got ~s)" (type-of msg)))
  
  (let ((type (getf msg :type)))
-    (unless (member type '(:REQUEST :EVENT :RESPONSE :LOG))
+    (unless (member type '(:REQUEST :EVENT :RESPONSE :LOG :STATUS))
      (error "Communication Protocol Schema Error: Invalid message type '~a'" type))
    
    (case type