author | Alan Dipert
<alan@dipert.org> 2020-01-12 04:01:19 UTC |
committer | Alan Dipert
<alan@dipert.org> 2020-01-12 04:01:19 UTC |
parent | 8a8bba61208efe9661052043612d2ecc2a680a39 |
boot.lisp | +2 | -2 |
diff --git a/boot.lisp b/boot.lisp index c7e7e15..eabc5d6 100644 --- a/boot.lisp +++ b/boot.lisp @@ -16,7 +16,7 @@ ',name))) ;; Use JACL from COMMON-LISP and switch to COMMON-LISP -(%let ((cl-pkg (\. (%js "Package") (|get| "COMMON-LISP")))) +(%let ((cl-pkg (\. (%js "Package") (|get| (\. '#:common-lisp |name|))))) (\. cl-pkg (|usePackage| cl:*package*)) (%setq cl:*package* cl-pkg)) @@ -33,7 +33,7 @@ ;; Use COMMON-LISP from COMMON-LISP-USER and switch to ;; COMMON-LISP-USER -(%let ((cl-user-pkg (\. (%js "Package") (|get| "COMMON-LISP-USER")))) +(%let ((cl-user-pkg (\. (%js "Package") (|get| (\. '#:common-lisp-user |name|))))) (\. cl-user-pkg (|usePackage| cl:*package*)) (%setq cl:*package* cl-user-pkg))