feat(core): Skills consolidation and v0.2.0 TUI integration

- NEW: org-skill-utils-lisp (consolidated from org-skill-lisp-utils)
  * 3-phase validation: structural, syntactic, semantic
  * Sandboxed eval, AST extraction/injection/wrapping
  * Format, list-definitions utilities

- NEW: org-skill-utils-org (consolidated from org-skill-emacs-edit)
  * Read/update/delete org headlines
  * Property management, TODO state handling
  * ID-link and internal link support

- DELETE: org-skill-lisp-utils (merged into utils-lisp)
- DELETE: org-skill-emacs-edit (merged into utils-org)
- RENAME: run-all-tests.lisp -> run-tests.lisp

- HARDEN: Skill loader with improved lisp keyword handling
- FIX: Package jailing issues with def-cognitive-tool macro conflicts
- ADD: Setup wizard (opencortex setup) and doctor (opencortex doctor)
- ADD: TUI client with Croatoan for native terminal rendering

- REMOVE: Dynamic loading from opencortex.asd (use :force t instead)
- CLEANUP: Test file consolidation (removed duplicate test suites)

Co-authored-by: Agent <agent@memex>

tests/pipeline-reason-tests.lisp

@@ -1,26 +1,26 @@
+(eval-when (:compile-toplevel :load-toplevel :execute)
+  (ql:quickload :fiveam :silent t))
+
 (defpackage :opencortex-pipeline-reason-tests
   (:use :cl :fiveam :opencortex)
   (:export #:pipeline-reason-suite))
 
 (in-package :opencortex-pipeline-reason-tests)
 
-(def-suite pipeline-reason-suite
-  :description "Test suite for Reason pipeline")
-
+(def-suite pipeline-reason-suite :description "Test suite for Reason pipeline")
 (in-suite pipeline-reason-suite)
 
 (test test-decide-gate-safety
-  "Decide gate should block unsafe LLM proposals."
-  ;; Setup: clear skills and register mock
   (clrhash opencortex::*skills-registry*)
   (opencortex::defskill :mock-safety
     :priority 50
-    :trigger (lambda (ctx) t)
-    :probabilistic (lambda (ctx) "Mock probabilistic")
+    :trigger (lambda (ctx) (declare (ignore ctx)) t)
     :deterministic (lambda (action ctx)
-                (list :type :LOG :payload (list :text "Action rejected by skill heuristics"))))
-  (let* ((candidate (list :type :REQUEST :payload (list :action :eval :code "(shell-command \"rm -rf /\")")))
-         (signal (list :type :EVENT :candidate candidate))
+                    (declare (ignore ctx))
+                    (if (search "rm -rf" (format nil "~s" action))
+                        (list :type :LOG :payload (list :text "Rejected"))
+                        action)))
+  (let* ((candidate '(:type :REQUEST :payload (:action :shell :cmd "rm -rf /")))
+         (signal '(:type :EVENT :payload (:sensor :user-input)))
          (result (deterministic-verify candidate signal)))
-    (is (eq :LOG (getf result :type)))
-    (is (search "Action rejected by skill heuristics" (getf (getf result :payload) :text)))))
+    (is (eq :LOG (getf result :type)))))