13 lines
408 B
EmacsLisp
13 lines
408 B
EmacsLisp
;;;; slime setup
|
|
(setq inferior-lisp-program "clisp")
|
|
|
|
;;; 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)
|