From 1456e59f7fe635cac894429a53be59763b8ac924 Mon Sep 17 00:00:00 2001
From: Amr Gharbeia <amr@gharbeia.net>
Date: Mon, 4 May 2026 18:34:33 -0400
Subject: [PATCH] fix: add (in-package :passepartout) to 5 skill files missing
 it
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Eliminates COMMON-LISP-USER::DEFSKILL and other package-related
STYLE-WARNINGs during compilation. Files affected:
- gateway-messaging, programming-repl, programming-standards,
  system-memory, system-archivist
Remaining warnings are cross-skill references (vault functions)
and minor same-file forward refs — category 2 per ROADMAP.
---
 lisp/gateway-messaging.lisp     | 2 ++
 lisp/programming-repl.lisp      | 2 ++
 lisp/programming-standards.lisp | 2 ++
 lisp/system-archivist.lisp      | 2 ++
 lisp/system-memory.lisp         | 2 ++
 org/gateway-messaging.org       | 2 ++
 org/programming-repl.org        | 2 ++
 org/programming-standards.org   | 2 ++
 org/system-archivist.org        | 2 ++
 org/system-memory.org           | 2 ++
 10 files changed, 20 insertions(+)

diff --git a/lisp/gateway-messaging.lisp b/lisp/gateway-messaging.lisp
index a4d6436..ccb2dcc 100644
--- a/lisp/gateway-messaging.lisp
+++ b/lisp/gateway-messaging.lisp
@@ -1,3 +1,5 @@
+(in-package :passepartout)
+
 (defvar *gateway-configs* (make-hash-table :test 'equal)
   "Maps platform name to plist (:token :thread :interval :enabled)")
 
diff --git a/lisp/programming-repl.lisp b/lisp/programming-repl.lisp
index 4428f05..e4d5658 100644
--- a/lisp/programming-repl.lisp
+++ b/lisp/programming-repl.lisp
@@ -1,3 +1,5 @@
+(in-package :passepartout)
+
 (defvar *repl-package* :passepartout
   "Default package for REPL evaluations.")
 
diff --git a/lisp/programming-standards.lisp b/lisp/programming-standards.lisp
index 7e12423..fe696d5 100644
--- a/lisp/programming-standards.lisp
+++ b/lisp/programming-standards.lisp
@@ -1,3 +1,5 @@
+(in-package :passepartout)
+
 (defun standards-git-clean-p (dir)
   "Checks if a directory has uncommitted changes."
   (let ((status (uiop:run-program (list "git" "-C" (namestring dir) "status" "--porcelain")
diff --git a/lisp/system-archivist.lisp b/lisp/system-archivist.lisp
index 137f4d6..5b5171e 100644
--- a/lisp/system-archivist.lisp
+++ b/lisp/system-archivist.lisp
@@ -1,3 +1,5 @@
+(in-package :passepartout)
+
 (defvar *archivist-last-scribe* 0
   "Universal time of the last Scribe distillation run.")
 
diff --git a/lisp/system-memory.lisp b/lisp/system-memory.lisp
index 061ce5f..d0a43e4 100644
--- a/lisp/system-memory.lisp
+++ b/lisp/system-memory.lisp
@@ -1,3 +1,5 @@
+(in-package :passepartout)
+
 (defun memory-inspect (&key (type-filter nil) (todo-filter nil) (limit 10))
   "Returns a structured report of memory state.
 Optional filters: TYPE-FILTER (keyword), TODO-FILTER (string).
diff --git a/org/gateway-messaging.org b/org/gateway-messaging.org
index 3b8610b..7220ee2 100644
--- a/org/gateway-messaging.org
+++ b/org/gateway-messaging.org
@@ -21,6 +21,8 @@ This replaces the old ~gateway-manager~ skill. The Telegram/Signal platform code
 
 ** Data
 #+begin_src lisp
+(in-package :passepartout)
+
 (defvar *gateway-configs* (make-hash-table :test 'equal)
   "Maps platform name to plist (:token :thread :interval :enabled)")
 
diff --git a/org/programming-repl.org b/org/programming-repl.org
index f3be133..c0a3f2e 100644
--- a/org/programming-repl.org
+++ b/org/programming-repl.org
@@ -36,6 +36,8 @@ The REPL skill fills this gap by:
 ** Global State
 ;; REPL-VERIFIED: 2026-05-03T13:00:00
 #+begin_src lisp
+(in-package :passepartout)
+
 (defvar *repl-package* :passepartout
   "Default package for REPL evaluations.")
 
diff --git a/org/programming-standards.org b/org/programming-standards.org
index cf38f07..e3d3e96 100644
--- a/org/programming-standards.org
+++ b/org/programming-standards.org
@@ -89,6 +89,8 @@ CLOSED: [2026-05-02 Sat 18:00]
 ** Standards Enforcement
 ;; REPL-VERIFIED: 2026-05-03T13:00:00
 #+begin_src lisp
+(in-package :passepartout)
+
 (defun standards-git-clean-p (dir)
   "Checks if a directory has uncommitted changes."
   (let ((status (uiop:run-program (list "git" "-C" (namestring dir) "status" "--porcelain")
diff --git a/org/system-archivist.org b/org/system-archivist.org
index ef357a9..b3571e2 100644
--- a/org/system-archivist.org
+++ b/org/system-archivist.org
@@ -20,6 +20,8 @@ events, performing two core functions:
 
 ;; REPL-VERIFIED: 2026-05-03T13:00:00
 #+begin_src lisp
+(in-package :passepartout)
+
 (defvar *archivist-last-scribe* 0
   "Universal time of the last Scribe distillation run.")
 
diff --git a/org/system-memory.org b/org/system-memory.org
index 21526f5..24c659c 100644
--- a/org/system-memory.org
+++ b/org/system-memory.org
@@ -12,6 +12,8 @@ Because Lisp is homoiconic (code is data), memory objects can be read as executa
 
 ;; REPL-VERIFIED: 2026-05-03T13:00:00
 #+begin_src lisp
+(in-package :passepartout)
+
 (defun memory-inspect (&key (type-filter nil) (todo-filter nil) (limit 10))
   "Returns a structured report of memory state.
 Optional filters: TYPE-FILTER (keyword), TODO-FILTER (string).