From 825391efa52c967ac4bc24dd7a8d96ebc67fc47c Mon Sep 17 00:00:00 2001 From: Pierre Neidhardt Date: Thu, 24 Oct 2019 18:32:10 +0200 Subject: [PATCH] Emacs/Racket: Init. --- .emacs.d/init.el | 1 + .emacs.d/lisp/init-racket.el | 14 ++++++++++++++ 2 files changed, 15 insertions(+) create mode 100644 .emacs.d/lisp/init-racket.el diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 1f3a079e..20af4ed2 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -270,6 +270,7 @@ (nconc package-selected-packages '(lispy lispyville rainbow-delimiters geiser slime)) (with-eval-after-load 'lisp-mode (require 'init-lisp)) (with-eval-after-load 'scheme (require 'init-scheme)) +(with-eval-after-load 'racket-mode (require 'init-racket)) (setq geiser-repl-history-filename (expand-file-name "geiser_history" user-emacs-directory)) ;; Emacs Lisp (add-hook 'emacs-lisp-mode-hook 'ambrevar/turn-on-prettify-before-save) diff --git a/.emacs.d/lisp/init-racket.el b/.emacs.d/lisp/init-racket.el new file mode 100644 index 00000000..ebade379 --- /dev/null +++ b/.emacs.d/lisp/init-racket.el @@ -0,0 +1,14 @@ +;;; Racket + +(require 'init-lispy) +(require 'init-rainbow) + +(add-hook 'racket-mode-hook 'ambrevar/init-lispy) +(add-hook 'racket-repl-mode-hook 'ambrevar/init-lispy) + +(when (fboundp 'rainbow-delimiters-mode) + (add-hook 'racket-mode-hook #'rainbow-delimiters-mode) + (add-hook 'racket-repl-mode-hook #'rainbow-delimiters-mode)) + + +(provide 'init-racket)