blob: fc64185ce466b5d2e144abd185c950438c9033c6 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
;;; -*- mode: Lisp -*-
(setf (logical-pathname-translations "SYS")
'(("SYS:SRC;**;*.*.*" #p"/usr/lib64/sbcl/src/**/*.*")
("SYS:CONTRIB;**;*.*.*" #p"/usr/lib64/sbcl/**/*.*")))
(let ((gentoo-init "/etc/common-lisp/gentoo-init.lisp"))
(when (probe-file gentoo-init)
(load gentoo-init)))
#-quicklisp
(let ((quicklisp-init (merge-pathnames ".quicklisp/setup.lisp"
(user-homedir-pathname))))
(when (probe-file quicklisp-init)
(load quicklisp-init)))
|
