changeset 45: |
cd44192f8af5 |
parent 43: |
d70be963bfb1 |
child 46: |
5d653dd07bd6 |
child 56: |
a5fa4f57e8b3 |
author: |
Richard Westhaver <ellis@rwest.io> |
date: |
Sun, 16 Jun 2024 00:10:20 +0000 |
files: |
.sbclrc |
description: |
move quicklisp |
1.1--- a/.sbclrc Sat Jun 15 19:57:38 2024 -0400
1.2+++ b/.sbclrc Sun Jun 16 00:10:20 2024 +0000
1.3@@ -10,8 +10,8 @@
1.4 *print-level* 32
1.5 *print-length* 256)
1.6
1.7-(defvar *quicklisp-setup* (or (probe-file #P"/usr/local/share/lisp/quicklisp/setup.lisp")
1.8- (probe-file (merge-pathnames "quicklisp/setup.lisp" (user-homedir-pathname)))))
1.9+(defvar *quicklisp-setup* (or (probe-file #P"~/.stash/quicklisp/setup.lisp")
1.10+ (probe-file #P"/usr/local/share/lisp/quicklisp/setup.lisp")))
1.11
1.12 #-quicklisp
1.13 (when *quicklisp-setup*
1.14@@ -20,7 +20,7 @@
1.15
1.16 (defun include-projects-from (path)
1.17 "Add PATH to QL;*LOCAL-PROJECT-DIRECTORIES* and ASDF:*CENTRAL-REGISTRY*."
1.18- (pushnew path ql:*local-project-directories*)
1.19+ #+quicklisp (pushnew path ql:*local-project-directories*)
1.20 (pushnew path asdf:*central-registry*))
1.21
1.22 (mapc #'include-projects-from