FIX: Correct all tangle paths and regenerate Lisp sources

skills/org-skill-chaos.org

@@ -28,7 +28,7 @@ Verify the system's stability and error-handling capabilities under stress.
 * Phase D: Build (Implementation)
 
 ** Chaos Injection Logic
-#+begin_src lisp :tangle ../projects/org-skill-chaos/src/chaos-logic.lisp
+#+begin_src lisp :tangle ../src/chaos-logic.lisp
 (defun chaos-inject-error (sensor-type)
   "Injects a synthetic error into a specific sensor pipeline."
   (org-agent:kernel-log "CHAOS - Injecting synthetic error into ~a sensor..." sensor-type)

skills/org-skill-chat.org

@@ -49,7 +49,7 @@ Interfaces for conversational event handling and UI integration. Source of truth
 * Phase D: Build (Implementation)
 
 ** Event Perception
-#+begin_src lisp :tangle ../projects/org-skill-chat/src/chat-logic.lisp
+#+begin_src lisp :tangle ../src/chat-logic.lisp
 (defun trigger-skill-chat (context)
   (let* ((payload (getf context :payload))
          (sensor (getf payload :sensor)))
@@ -57,7 +57,7 @@ Interfaces for conversational event handling and UI integration. Source of truth
 #+end_src
 
 ** Symbolic Verification
-#+begin_src lisp :tangle ../projects/org-skill-chat/src/chat-logic.lisp
+#+begin_src lisp :tangle ../src/chat-logic.lisp
 (defun verify-skill-chat (proposed-action context)
   (let* ((payload (getf proposed-action :payload))
          (action (or (getf payload :action) (getf proposed-action :action)))
@@ -78,7 +78,7 @@ Interfaces for conversational event handling and UI integration. Source of truth
 ** Neural Response Generation
 The Chat skill acts as the conversational UI. Because the ~org-agent~ kernel evaluates LLM output via ~read-from-string~ (expecting a valid s-expression) and the chat verifier strictly expects an Emacs ~:insert-at-end~ actuation, we must explicitly mandate that the LLM wraps its conversational output in a Common Lisp property list.
 
-#+begin_src lisp :tangle ../projects/org-skill-chat/src/chat-logic.lisp
+#+begin_src lisp :tangle ../src/chat-logic.lisp
 (defun neuro-skill-chat (context)
   "Generates a conversational response, stripping system errors from context."
   (let* ((payload (getf context :payload))

skills/org-skill-consensus.org

@@ -27,7 +27,7 @@ Enable reliable, cross-instance coordination without a central master.
 * Phase D: Build (Implementation)
 
 ** Consensus Algorithm (Simplified Raft)
-#+begin_src lisp :tangle projects/org-skill-consensus/src/consensus-logic.lisp
+#+begin_src lisp :tangle ../src/consensus-logic.lisp
 (defun consensus-propose-vote (proposal)
   "Broadcasts a proposal to the peer swarm and collects votes.
    Implements PSF Social Consensus Protocol."

skills/org-skill-environment-config.org

@@ -34,7 +34,7 @@ Define a standardized `CONFIG` object type in the Object Store. Provide getter/s
 ** 2. Semantic Interfaces
 
 *** Fleet Configuration
-#+begin_src lisp :tangle ../projects/org-skill-environment-config/src/config-logic.lisp
+#+begin_src lisp :tangle ../src/config-logic.lisp
 (in-package :org-agent)
 
 (defun set-llm-model (provider model-id)

skills/org-skill-formal-verification.org

@@ -26,7 +26,7 @@ Define a logic-based verification layer for high-integrity decision making.
 * Phase D: Build (Implementation)
 
 ** Invariants Registry
-#+begin_src lisp :tangle projects/org-skill-formal-verification/src/verification-logic.lisp
+#+begin_src lisp :tangle ../src/verification-logic.lisp
 (defparameter *security-invariants* 
   '((:name "Path-Safety" :formula "(assert (forall ((p String)) (=> (is-write-op p) (str.prefixof \"/home/user/memex\" p))))")))
 

skills/org-skill-inbox-processor.org

@@ -37,7 +37,7 @@ Iterate through the inbox. Use System 2 (Symbolic) to identify the tag. If ~@per
 * Phase D: Build (Implementation)
 
 ** Helper: Privacy & Archive Checks
-#+begin_src lisp :tangle ../projects/org-skill-inbox-processor/src/processor-logic.lisp
+#+begin_src lisp :tangle ../src/processor-logic.lisp
 (defun inbox-is-private-p (tags)
   (member "@personal" tags :test #'string-equal))
 
@@ -46,7 +46,7 @@ Iterate through the inbox. Use System 2 (Symbolic) to identify the tag. If ~@per
 #+end_src
 
 ** Neural Stage (Enrichment)
-#+begin_src lisp :tangle ../projects/org-skill-inbox-processor/src/processor-logic.lisp
+#+begin_src lisp :tangle ../src/processor-logic.lisp
 (defun neuro-skill-inbox-processor (context)
   (let* ((payload (getf context :payload))
          (content (getf payload :content))
@@ -63,7 +63,7 @@ RULES:
 #+end_src
 
 ** Symbolic Stage (The Physical Move)
-#+begin_src lisp :tangle ../projects/org-skill-inbox-processor/src/processor-logic.lisp
+#+begin_src lisp :tangle ../src/processor-logic.lisp
 (defun inbox-process-logic (action context)
   (declare (ignore action))
   (let* ((payload (getf context :payload))

skills/org-skill-router.org

@@ -38,7 +38,7 @@ Implement a deterministic classifier for known sensors and a neural fallback for
 - =:REASONING=: Generative tasks (coding, blueprinting, debugging).
 
 *** Routing Logic
-#+begin_src lisp :tangle ../projects/org-skill-router/src/router-logic.lisp
+#+begin_src lisp :tangle ../src/router-logic.lisp
 (in-package :org-agent)
 
 (defun router-classify-complexity (context)

skills/org-skill-shell-actuator.org

@@ -52,7 +52,7 @@ Interfaces for secure system calls. State is event-driven via the core kernel bu
 * Phase D: Build (Implementation)
 
 ** Whitelisting & Execution
-#+begin_src lisp :tangle ../projects/org-skill-shell-actuator/src/shell-logic.lisp
+#+begin_src lisp :tangle ../src/shell-logic.lisp
 (defparameter *allowed-commands* '("ls" "git" "rg" "grep" "date" "echo" "cat" "node" "python3" "sbcl"))
 
 (defun execute-shell-safely (action context)
@@ -101,7 +101,7 @@ Interfaces for secure system calls. State is event-driven via the core kernel bu
 #+end_src
 
 ** Feedback Perception
-#+begin_src lisp :tangle ../projects/org-skill-shell-actuator/src/shell-logic.lisp
+#+begin_src lisp :tangle ../src/shell-logic.lisp
 (defun trigger-skill-shell-actuator (context)
   (let ((type (getf context :type))
         (payload (getf context :payload)))
@@ -110,7 +110,7 @@ Interfaces for secure system calls. State is event-driven via the core kernel bu
 #+end_src
 
 ** Neuro-Cognitive Analysis
-#+begin_src lisp :tangle ../projects/org-skill-shell-actuator/src/shell-logic.lisp
+#+begin_src lisp :tangle ../src/shell-logic.lisp
 (defun neuro-skill-shell-actuator (context)
   (let* ((p (getf context :payload))
          (cmd (getf p :cmd))

skills/org-skill-token-accountant.org

@@ -30,7 +30,7 @@ Maintain a state-aware provider cascade that routes around "pain" (failures) and
 ** 2. Semantic Interfaces
 
 *** Routing and Pain Management
-#+begin_src lisp :tangle ../projects/org-skill-token-accountant/src/accountant-logic.lisp
+#+begin_src lisp :tangle ../src/accountant-logic.lisp
 (in-package :org-agent)
 
 (defvar *provider-pain-table* (make-hash-table :test 'equal))