;;;; slime setup
(slime-setup '(slime-fancy slime-quicklisp slime-asdf slime-mrepl))
(setq inferior-lisp-program "sbcl")

;; ;;; use my local copy of the Common Lisp HyperSpec
;; (load "~/clhs-use-local.el" t)

;; ;;; open documentation in eww browser
;; (defun hyperspec-lookup--hyperspec-lookup-eww (orig-fun &rest args)
;;   (let ((browse-url-browser-function 'eww-browse-url))
;;     (apply orig-fun args)))

;; (advice-add 'hyperspec-lookup :around #'hyperspec-lookup--hyperspec-lookup-eww)