Start slime automatically with slime-auto-start
This commit is contained in:
parent
158f695813
commit
ffe8350530
1 changed files with 2 additions and 9 deletions
|
@ -68,20 +68,13 @@
|
||||||
(add-hook 'lisp-mode-hook (lambda () (run-hooks 'prelude-lisp-coding-hook)))
|
(add-hook 'lisp-mode-hook (lambda () (run-hooks 'prelude-lisp-coding-hook)))
|
||||||
(add-hook 'slime-repl-mode-hook (lambda () (run-hooks 'prelude-interactive-lisp-coding-hook)))
|
(add-hook 'slime-repl-mode-hook (lambda () (run-hooks 'prelude-interactive-lisp-coding-hook)))
|
||||||
|
|
||||||
(defun prelude-start-slime ()
|
|
||||||
"Start SLIME unless it's already running."
|
|
||||||
(unless (and (fboundp 'slime-connected-p) (slime-connected-p))
|
|
||||||
(save-excursion (slime))))
|
|
||||||
|
|
||||||
;; start slime automatically when we open a lisp file
|
|
||||||
(add-hook 'slime-mode-hook 'prelude-start-slime)
|
|
||||||
|
|
||||||
(eval-after-load "slime"
|
(eval-after-load "slime"
|
||||||
'(progn
|
'(progn
|
||||||
(setq slime-complete-symbol-function 'slime-fuzzy-complete-symbol
|
(setq slime-complete-symbol-function 'slime-fuzzy-complete-symbol
|
||||||
slime-fuzzy-completion-in-place t
|
slime-fuzzy-completion-in-place t
|
||||||
slime-enable-evaluate-in-emacs t
|
slime-enable-evaluate-in-emacs t
|
||||||
slime-autodoc-use-multiline-p t)
|
slime-autodoc-use-multiline-p t
|
||||||
|
slime-auto-start 'always)
|
||||||
|
|
||||||
(define-key slime-mode-map (kbd "TAB") 'slime-indent-and-complete-symbol)
|
(define-key slime-mode-map (kbd "TAB") 'slime-indent-and-complete-symbol)
|
||||||
(define-key slime-mode-map (kbd "C-c C-s") 'slime-selector)))
|
(define-key slime-mode-map (kbd "C-c C-s") 'slime-selector)))
|
||||||
|
|
Loading…
Reference in a new issue