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).