From 428739956df94966c96f29ded15fbebb6bcab49d Mon Sep 17 00:00:00 2001 From: Valentin Boettcher Date: Thu, 1 Nov 2018 20:41:32 +0100 Subject: [PATCH] fix lispy --- dots/home/.emacs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/dots/home/.emacs b/dots/home/.emacs index 7a91a8d..c39519b 100644 --- a/dots/home/.emacs +++ b/dots/home/.emacs @@ -198,7 +198,7 @@ (load (expand-file-name "~/.roswell/helper.el")) (slime-setup '(slime-company)) (defun sm-greek-lambda () (font-lock-add-keywords nil `(("\\" (0 (progn (compose-region (match-beginning 0) (match-end 0) ,(make-char 'greek-iso8859-7 107)) nil)))))) -(define-key lispy-mode-map (kbd "M-(") #'lispy-parens-auto-wrap) + (add-hook 'emacs-lisp-mode-hook 'sm-greek-lambda) (add-hook 'slime-mode-hook 'sm-greek-lambda) (add-hook 'emacs-lisp-mode-hook #'lispy-mode) @@ -207,7 +207,8 @@ (add-hook 'lisp-mode-hook #'lispy-mode) (add-hook 'lisp-interaction-mode-hook #'lispy-mode) (add-hook 'scheme-mode-hook #'lispy-mode) - +(with-eval-after-load 'lispy + (define-key lispy-mode-map (kbd "M-(") #'lispy-parens-auto-wrap)) ;;; Org (require 'org-install)