[nongnu] elpa/sly 6761960 2/2: Fix #399: don't hardcode REPL starting package to CL-USER

[ELPA Syncer]

branch: elpa/sly
commit 6761960693ba005b24cfcfa457dd8e73c92cb859
Author: João Távora <joaotavora@gmail.com>
Commit: João Távora <joaotavora@gmail.com>

    Fix #399: don't hardcode REPL starting package to CL-USER
    
    Default it to whatever the global value of CL:*PACKAGE* is, which is
    usually :COMMON-LISP-USER on startup.
    
    * contrib/slynk-mrepl.lisp (mrepl): Default local CL:*PACKAGE* to
    CL:*PACKAGE*.
---
 contrib/slynk-mrepl.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/contrib/slynk-mrepl.lisp b/contrib/slynk-mrepl.lisp
index 5bd08d4..fc8af0a 100644
--- a/contrib/slynk-mrepl.lisp
+++ b/contrib/slynk-mrepl.lisp
@@ -30,7 +30,7 @@
    (pending-errors :initform nil :accessor mrepl-pending-errors))
   (:documentation "A listener implemented in terms of a channel.")
   (:default-initargs
-   :initial-env `((cl:*package* . ,(find-package :COMMON-LISP-USER))
+   :initial-env `((cl:*package* . ,cl:*package*)
                   (*) (**) (***)
                   (/) (//) (///)
                   (+) (++) (+++)