0xa/.emacs.d
1
0
Fork 0
Code Issues Pull requests Releases Activity

add support for scheme and friends

Browse source
This commit is contained in:
Grigory Shipunov 2020-06-06 18:14:10 +02:00
parent f62984e838
commit 5ef4496496
No known key found for this signature in database
GPG key ID: 77BB6C3E4771EE7C
1 changed files with 18 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

20
init.el
View file

@ -79,6 +79,7 @@
;;That's what you pay with for org mode ;;That's what you pay with for org mode
(add-hook 'prog-mode-hook 'tabs-yay) (add-hook 'prog-mode-hook 'tabs-yay)
(add-hook 'lisp-mode-hook 'tabs-nay) (add-hook 'lisp-mode-hook 'tabs-nay)
(add-hook 'scheme-mode-hook 'tabs-nay)
(add-hook 'emacs-lisp-mode-hook 'tabs-nay) (add-hook 'emacs-lisp-mode-hook 'tabs-nay)
;; highlight the parens ;; highlight the parens
@ -174,7 +175,9 @@
(use-package rainbow-delimiters (use-package rainbow-delimiters
:straight t :straight t
:hook ((emacs-lisp-mode . rainbow-delimiters-mode) :hook ((emacs-lisp-mode . rainbow-delimiters-mode)
(c-mode . rainbow-delimiters-mode))) (lisp-mode . rainbow-delimiters-mode)
(scheme-mode . rainbow-delimiters-mode)
(cc-mode . rainbow-delimiters-mode)))
(use-package org (use-package org
:straight org-plus-contrib :straight org-plus-contrib
@ -213,7 +216,15 @@
"* [[%x][%?]\n:PROPERTIES:\n:CREATED: %U\n:END:\n\n"))) "* [[%x][%?]\n:PROPERTIES:\n:CREATED: %U\n:END:\n\n")))
;; autosave advices for agenda and org-capture ;; autosave advices for agenda and org-capture
(advice-add 'org-agenda-quit :before 'org-save-all-org-buffers) (advice-add 'org-agenda-quit :before 'org-save-all-org-buffers)
(advice-add 'org-capture-finalize :after 'org-save-all-org-buffers)) (advice-add 'org-capture-finalize :after 'org-save-all-org-buffers)
;; babel stuff
(org-babel-do-load-languages
'org-babel-load-languages
'((scheme . t)
(emacs-lisp .t)
(python . t)
(C . t))))
(use-package org-tempo (use-package org-tempo
:after org) :after org)
@ -328,6 +339,11 @@
:init :init
(setq vterm-kill-buffer-on-exit t)) (setq vterm-kill-buffer-on-exit t))
(use-package geiser
:straight t
:init
(setq geiser-active-implementations '(racket)))
;; throw away all the list-of-custom-shit! ;; throw away all the list-of-custom-shit!
(setq custom-file "~/.emacs.d/custom.el") (setq custom-file "~/.emacs.d/custom.el")
(load custom-file 'noerror) (load custom-file 'noerror)