X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-aclrepl%2FREADME;h=c848215dcc78337849acb4c10479c0d55c09f891;hb=7ff2233608f1f110e112ae576fa829618ce181ae;hp=6eb65fd1ea5f5f723fe8269bdd396ba3c21e5e68;hpb=3e991f3ecd3a0a5ba50bc5b43c4ed0133c837701;p=sbcl.git

diff --git a/contrib/sb-aclrepl/README b/contrib/sb-aclrepl/README
index 6eb65fd..c848215 100644
--- a/contrib/sb-aclrepl/README
+++ b/contrib/sb-aclrepl/README
@@ -7,11 +7,10 @@ debugger is planned.
 
 USAGE
 =====
-To start sb-aclrepl as your read-eval-print loop, execute the command
+To start sb-aclrepl as your read-eval-print loop, put the form
   (require 'sb-aclrepl)
+in your ~/.sbclrc initialization file.
 
-You can also all this command to your ~/.sbclrc to have sb-aclrepl be the default REPL
-for your SBCL sessions.
 
 EXAMPLE ~/.sbclrc FILE
 ======================
@@ -19,19 +18,19 @@ EXAMPLE ~/.sbclrc FILE
 (ignore-errors (require 'sb-aclrepl))
 
 (when (find-package 'sb-aclrepl)
-  (push :aclrepl *features*))
-
+  (push :aclrepl cl:*features*))
 #+aclrepl
 (progn
   (setq sb-aclrepl:*max-history* 100)
-  (setf (sb-aclrepl:alias "asdc") #'(lambda (sys) (asdf:oos 'asdf:load-op sys)))
-  (sb-aclrepl:alias "l" (sys) (asdf:oos 'asdf:load-op sys))
-  (sb-aclrepl:alias "t" (sys) (asdf:oos 'asdf:test-op sys))
+  (setf (sb-aclrepl:alias "asdc") 
+       #'(lambda (sys) (asdf:operate 'asdf:compile-op sys)))
+  (sb-aclrepl:alias "l" (sys) (asdf:operate 'asdf:load-op sys))
+  (sb-aclrepl:alias "t" (sys) (asdf:operate 'asdf:test-op sys))
   ;; The 1 below means that two characaters ("up") are required
   (sb-aclrepl:alias ("up" 1 "Use package") (package) (use-package package))
   ;; The 0 below means only the first letter ("r") is required, such as ":r base64"
   (sb-aclrepl:alias ("require" 0 "Require module") (sys) (require sys))
-)
+  (setq cl:*features* (delete :aclrepl cl:*features*)))
 
 Questions, comments, or bug reports should be sent to Kevin Rosenberg
 <kevin@rosenberg.net>.