Minor cleanup
This commit is contained in:
parent
03b1c505f2
commit
e12d5fbf51
2 changed files with 2 additions and 16 deletions
|
@ -321,13 +321,6 @@ the current buffer."
|
||||||
(interactive)
|
(interactive)
|
||||||
(insert (format-time-string "%c" (current-time))))
|
(insert (format-time-string "%c" (current-time))))
|
||||||
|
|
||||||
;; (defun prelude-conditionally-enable-paredit-mode ()
|
|
||||||
;; "Enable `paredit-mode' in the minibuffer, during `eval-expression'."
|
|
||||||
;; (if (eq this-command 'eval-expression)
|
|
||||||
;; (paredit-mode 1)))
|
|
||||||
|
|
||||||
;; (add-hook 'minibuffer-setup-hook 'prelude-conditionally-enable-paredit-mode)
|
|
||||||
|
|
||||||
(defun prelude-recentf-ido-find-file ()
|
(defun prelude-recentf-ido-find-file ()
|
||||||
"Find a recent file using ido."
|
"Find a recent file using ido."
|
||||||
(interactive)
|
(interactive)
|
||||||
|
|
|
@ -63,21 +63,14 @@
|
||||||
(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)))
|
||||||
|
|
||||||
;; start slime automatically when we open a lisp file
|
|
||||||
(defun prelude-start-slime ()
|
(defun prelude-start-slime ()
|
||||||
|
"Start SLIME unless it's already running."
|
||||||
(unless (slime-connected-p)
|
(unless (slime-connected-p)
|
||||||
(save-excursion (slime))))
|
(save-excursion (slime))))
|
||||||
|
|
||||||
|
;; start slime automatically when we open a lisp file
|
||||||
(add-hook 'slime-mode-hook 'prelude-start-slime)
|
(add-hook 'slime-mode-hook 'prelude-start-slime)
|
||||||
|
|
||||||
;; Stop SLIME's REPL from grabbing DEL,
|
|
||||||
;; which is annoying when backspacing over a '('
|
|
||||||
;; (defun prelude-override-slime-repl-bindings-with-paredit ()
|
|
||||||
;; (define-key slime-repl-mode-map
|
|
||||||
;; (read-kbd-macro paredit-backward-delete-key) nil))
|
|
||||||
|
|
||||||
;; (add-hook 'slime-repl-mode-hook 'prelude-override-slime-repl-bindings-with-paredit)
|
|
||||||
|
|
||||||
(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
|
||||||
|
|
Loading…
Reference in a new issue