diff --git a/users/crumb/programs/emacs/modules/lang/syd-lang-emacs-lisp.el b/users/crumb/programs/emacs/modules/lang/syd-lang-emacs-lisp.el index 0243ce3..31501c2 100644 --- a/users/crumb/programs/emacs/modules/lang/syd-lang-emacs-lisp.el +++ b/users/crumb/programs/emacs/modules/lang/syd-lang-emacs-lisp.el @@ -60,16 +60,17 @@ to a pop up buffer." :source-buffer (current-buffer) :force-popup current-prefix-arg)) -(set-repl-handler! 'emacs-lisp-mode - #'syd/open-emacs-lisp-repl) +(dolist (m '(emacs-lisp-mode lisp-data-mode)) + (set-repl-handler! 'emacs-lisp-mode + #'syd/open-emacs-lisp-repl) + (set-eval-handler! 'emacs-lisp-mode + #'syd-emacs-lisp-eval)) -(set-eval-handler! 'emacs-lisp-mode - #'syd-emacs-lisp-eval) - -(add-hook 'emacs-lisp-mode-hook #'syd-lisp-mode) +(syd-add-hook '(emacs-lisp-mode-hook lisp-data-mode) + #'syd-lisp-mode) ;; DEPRECATED: Remove once syd-strategies is working. -(syd-add-hook '(emacs-lisp-mode-hook help-mode-hook) +(syd-add-hook '(emacs-lisp-mode-hook help-mode-hook lisp-data-mode) (defun syd-emacs-set-handlers-h () (setq-local syd-lookup-documentation-handlers (list #'syd-emacs-lisp-lookup-documentation))))