git » jacl.git » commit 73be906

Fix boot.lisp

author Alan Dipert
2020-01-12 04:01:19 UTC
committer Alan Dipert
2020-01-12 04:01:19 UTC
parent 8a8bba61208efe9661052043612d2ecc2a680a39

Fix boot.lisp

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