fix(setup): require uiop in emacs for correct tangle path resolution

This commit is contained in:
2026-04-28 17:51:04 -04:00
parent ae7d0a4ee8
commit 5be90dcb8f

View File

@@ -68,15 +68,15 @@ setup_system() {
# Critical: Tangle manifest first to establish system structure
echo "Tangling harness/manifest.org..."
emacs -Q --batch --eval "(require 'org)" --eval "(setq org-babel-lisp-eval-fn 'identity)" --eval "(org-babel-tangle-file \"harness/manifest.org\")" >/dev/null 2>&1 || true
emacs -Q --batch --eval "(require 'org)" --eval "(require 'uiop)" --eval "(org-babel-tangle-file \"harness/manifest.org\")" >/dev/null 2>&1 || true
echo "Tangling harness/tui-client.org..."
emacs -Q --batch --eval "(require 'org)" --eval "(setq org-babel-lisp-eval-fn 'identity)" --eval "(org-babel-tangle-file \"harness/tui-client.org\")" >/dev/null 2>&1 || true
emacs -Q --batch --eval "(require 'org)" --eval "(require 'uiop)" --eval "(org-babel-tangle-file \"harness/tui-client.org\")" >/dev/null 2>&1 || true
for f in harness/*.org skills/*.org; do
if [ "$f" != "harness/manifest.org" ] && [ "$f" != "harness/tui-client.org" ]; then
echo "Tangling $f..."
emacs -Q --batch --eval "(require 'org)" --eval "(setq org-babel-lisp-eval-fn 'identity)" --eval "(org-babel-tangle-file \"$f\")" >/dev/null 2>&1 || true
emacs -Q --batch --eval "(require 'org)" --eval "(require 'uiop)" --eval "(org-babel-tangle-file \"$f\")" >/dev/null 2>&1 || true
fi
done