Changeset 14085 for trunk/abcl/examples/misc/dotabclrc

Timestamp:

08/14/12 12:16:11 (8 years ago)

Author:

Mark Evenson

Message:

examples/misc: fix installation of Quicklisp from scratch.

File:

• trunk/abcl/examples/misc/dotabclrc (modified) (2 diffs)

trunk/abcl/examples/misc/dotabclrc

@@ -1 +1 @@
 ;;; -*- Mode: Lisp -*-
 
-;;; Possible codas for inclusion in the Armed Bear startup file #p"~/.abclrc"
+;;; Possible code for inclusion in the Armed Bear startup file #p"~/.abclrc"
 
 #-quicklisp
@@ -8 +8 @@
   (unless (probe-file quicklisp-local)
     (when (probe-file quicklisp-remote)     ;;; XXX possibly search for a proxy÷
-      (load quicklisp-remote)))
+      (load quicklisp-remote)
+      (funcall (intern (symbol-name 'install) :quicklisp-quickstart))))
   (when (probe-file quicklisp-local)
     (load quicklisp-local)))
 
+;; 
 (require :asdf)
 (require :abcl-contrib)