diff --git a/contrib/20.repl/repl.scm b/contrib/20.repl/repl.scm
index 920b3566..aa7640cf 100644
--- a/contrib/20.repl/repl.scm
+++ b/contrib/20.repl/repl.scm
@@ -21,21 +21,22 @@
 
   (define user-env (library-environment (find-library '(picrin user))))
 
-  (eval
-   '(import (scheme base)
-            (scheme load)
-            (scheme process-context)
-            (scheme read)
-            (scheme write)
-            (scheme file)
-            (scheme inexact)
-            (scheme cxr)
-            (scheme lazy)
-            (scheme time)
-            (picrin macro)
-            (picrin array)
-            (picrin library))
-   user-env)
+  (begin
+    (current-library (find-library '(picrin user)))
+    (eval
+     '(import (scheme base)
+              (scheme load)
+              (scheme process-context)
+              (scheme read)
+              (scheme write)
+              (scheme file)
+              (scheme inexact)
+              (scheme cxr)
+              (scheme lazy)
+              (scheme time)
+              (picrin macro))
+     user-env)
+    (current-library (find-library '(picrin repl))))
 
   (define (repl)
     (let loop ((buf ""))