init.lisp

(in-package :cl-user)

;; better editor font in Mac OS X 10.6
(setq ccl:*fred-default-font-spec* '("Menlo Regular" 12 :plain))
(setq ccl:*mini-buffer-font-spec* '("Menlo Regular" 10))

(defun recompile-asdf ()
  (compile-file #4P"CCL:library;asdf.lisp"))

#+ignore ; enable once ASDF is compiled
(require :asdf)

#+ignore ; sample registry
(dolist (i '(#P"Macintosh HD:Users:binghe:Lisp:usocket:"
             #P"Macintosh HD:Users:binghe:Lisp:OSCAR-Lisp:"))
  (pushnew i asdf:*central-registry* :test #'equal))