(load "~/sw/quicklisp.lisp")
(load "~/quicklisp/setup.lisp")
(ql:quickload "quicklisp-slime-helper")
(require :asdf)
(setf asdf:*central-registry*
;; Default directories, usually just the ``current directory''
'(*default-pathname-defaults*
#p"/Users/jimka/sw/"
#p”/Volumes/Disk2/jimka/sw/"
))
Here is my .emacs
(put 'downcase-region 'disabled nil)
(put 'narrow-to-region 'disabled nil)
(load (expand-file-name "~/quicklisp/slime-helper.el"))
(setq inferior-lisp-program "/usr/local/bin/sbcl")
(setq slime-contribs '(slime-fancy))
(add-to-list 'load-path "~/sw/slime")
(require 'slime-autoloads)