fix(setup): Remove --non-interactive from all SBCL calls to ensure TUI and pre-load work correctly
Some checks failed
Deploy-Agent-V15-Stdin / JOB-V15-STDIN (push) Failing after 24s
Some checks failed
Deploy-Agent-V15-Stdin / JOB-V15-STDIN (push) Failing after 24s
This commit is contained in:
@@ -173,7 +173,7 @@ if [[ "$1" == "--boot" ]]; then
|
|||||||
fi
|
fi
|
||||||
done < "$SCRIPT_DIR/.env"
|
done < "$SCRIPT_DIR/.env"
|
||||||
fi
|
fi
|
||||||
exec sbcl --non-interactive --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(setf *debugger-hook* (lambda (c h) (declare (ignore h)) (format *error-output* \"FATAL LISP ERROR: ~a~%\" c) (uiop:print-backtrace :stream *error-output*) (uiop:quit 1)))" --eval "(push (truename \"$SCRIPT_DIR/\") asdf:*central-registry*)" --eval "(format t \"--- Quickloading OpenCortex ---~%\")" --eval "(ql:quickload '(:opencortex :croatoan))" --eval "(opencortex:main)"
|
exec sbcl --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(setf *debugger-hook* (lambda (c h) (declare (ignore h)) (format *error-output* \"FATAL LISP ERROR: ~a~%\" c) (uiop:print-backtrace :stream *error-output*) (uiop:quit 1)))" --eval "(push (truename \"$SCRIPT_DIR/\") asdf:*central-registry*)" --eval "(format t \"--- Quickloading OpenCortex ---~%\")" --eval "(ql:quickload '(:opencortex :croatoan))" --eval "(opencortex:main)"
|
||||||
fi
|
fi
|
||||||
|
|
||||||
# --- 4. INTERACT ---
|
# --- 4. INTERACT ---
|
||||||
@@ -192,7 +192,7 @@ if [[ "$1" == "tui" ]]; then
|
|||||||
|
|
||||||
# Launch TUI
|
# Launch TUI
|
||||||
echo -e "${BLUE}Launching Croatoan TUI...${NC}"
|
echo -e "${BLUE}Launching Croatoan TUI...${NC}"
|
||||||
exec sbcl --non-interactive --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(push (truename \"$SCRIPT_DIR/\") asdf:*central-registry*)" --eval "(ql:quickload :opencortex/tui)" --eval "(opencortex.tui:main)"
|
exec sbcl --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(push (truename \"$SCRIPT_DIR/\") asdf:*central-registry*)" --eval "(ql:quickload :opencortex/tui)" --eval "(opencortex.tui:main)"
|
||||||
fi
|
fi
|
||||||
|
|
||||||
connect() {
|
connect() {
|
||||||
|
|||||||
Reference in New Issue
Block a user