chore: Audit terminology (org-agent -> opencortex)
This commit is contained in:
@@ -38,7 +38,7 @@ Iterate through the inbox. Use Deterministic Engine (Symbolic) to identify the t
|
||||
|
||||
** Helper: Privacy & Archive Checks
|
||||
#+begin_src lisp :tangle ../src/processor-logic.lisp
|
||||
(in-package :org-agent)
|
||||
(in-package :opencortex)
|
||||
(defun inbox-is-private-p (tags)
|
||||
(member "@personal" tags :test #'string-equal))
|
||||
|
||||
@@ -48,7 +48,7 @@ Iterate through the inbox. Use Deterministic Engine (Symbolic) to identify the t
|
||||
|
||||
** Neural Stage (Enrichment)
|
||||
#+begin_src lisp :tangle ../src/processor-logic.lisp
|
||||
(in-package :org-agent)
|
||||
(in-package :opencortex)
|
||||
(defun neuro-skill-inbox-processor (context)
|
||||
(let* ((payload (getf context :payload))
|
||||
(content (getf payload :content))
|
||||
@@ -66,7 +66,7 @@ RULES:
|
||||
|
||||
** Symbolic Stage (The Physical Move)
|
||||
#+begin_src lisp :tangle ../src/processor-logic.lisp
|
||||
(in-package :org-agent)
|
||||
(in-package :opencortex)
|
||||
(defun inbox-process-logic (action context)
|
||||
(declare (ignore action))
|
||||
(let* ((payload (getf context :payload))
|
||||
@@ -74,7 +74,7 @@ RULES:
|
||||
(when (eq sensor :heartbeat)
|
||||
(let* ((base-dir (or (uiop:getenv "MEMEX_DIR") "/home/user/memex/"))
|
||||
(inbox-path (merge-pathnames "inbox.org" base-dir)))
|
||||
(org-agent:harness-log "INBOX - Scanning ~a for migration..." (uiop:native-namestring inbox-path))
|
||||
(opencortex:harness-log "INBOX - Scanning ~a for migration..." (uiop:native-namestring inbox-path))
|
||||
;; Physical move logic would go here using Org AST parsing
|
||||
'(:target :system :payload (:action :message :text "Inbox processing complete (Simulation)."))))))
|
||||
#+end_src
|
||||
|
||||
Reference in New Issue
Block a user