github/dotfiles
1
0
Fork 0
mirror of https://github.com/correl/dotfiles.git synced 2024-12-18 11:06:17 +00:00
Code Issues Projects Releases Packages Wiki Activity

[emacs] Improve lisp configuration

Browse source
This commit is contained in:
Correl Roush 2015-01-29 23:21:55 -05:00
parent 5077b0912e
commit 3c0421ad9b
1 changed files with 39 additions and 25 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

64
.emacs.d/emacs.org
View file

@ -353,30 +353,14 @@ A modern list api for Emacs. No 'cl required.
#+END_SRC #+END_SRC
** Lisps ** Lisps
#+name: lisps #+name: lisps
| Mode | Description | Package | | Mode | Description |
|------------+----------------------+----------| |------------+---------------------------|
| lisp | Common Lisp | | | lisp | Common Lisp |
| emacs-lisp | Emacs Lisp | | | emacs-lisp | Emacs Lisp |
| scheme | Scheme | | | scheme | Scheme |
| lfe | Lisp-Flavored Erlang | lfe-mode | | lfe | Lisp-Flavored Erlang |
| clojure | Clojure | | | clojure | Clojure |
| hy | Hy (Lisp-flavored Python) |
#+BEGIN_SRC emacs-lisp :noweb yes :results code
(let ((packages (-remove 'null
(mapcar 'last (cddr '<<lisps()>>)))))
`(progn ,@packages))
#+END_SRC
#+RESULTS:
#+BEGIN_SRC emacs-lisp
(progn
("")
("")
("")
("lfe-mode")
(""))
#+END_SRC
#+name: programming #+name: programming
#+BEGIN_SRC emacs-lisp :noweb yes #+BEGIN_SRC emacs-lisp :noweb yes
@ -397,7 +381,7 @@ A modern list api for Emacs. No 'cl required.
(mapc (lambda (lisp) (mapc (lambda (lisp)
(let ((mode-hook (intern (concat lisp "-mode-hook")))) (let ((mode-hook (intern (concat lisp "-mode-hook"))))
(message (format "Installing LISP mode hook for %S" mode-hook)) (message (format "Installing LISP mode hook for %S" lisp))
(add-hook mode-hook (lambda () (add-hook mode-hook (lambda ()
(show-paren-mode t) (show-paren-mode t)
(electric-indent-mode t) (electric-indent-mode t)
@ -406,6 +390,36 @@ A modern list api for Emacs. No 'cl required.
(rainbow-identifiers-mode t))))) (rainbow-identifiers-mode t)))))
(mapcar 'car (cddr '<<lisps()>>))) (mapcar 'car (cddr '<<lisps()>>)))
#+END_SRC #+END_SRC
*** Lisp-Flavored Erlang
#+name: programming
#+BEGIN_SRC emacs-lisp
(use-package lfe-mode
:ensure t
:mode "\\.lfe$")
#+END_SRC
*** Clojure
#+name: programming
#+BEGIN_SRC emacs-lisp
(use-package clojure-mode
:ensure t
:mode (("\\.clj[sx]?$" . clojure-mode)
("\\.edn$" . clojure-mode)))
#+END_SRC
**** Cider
Communicates with the clojure REPL.
#+name: programming
#+BEGIN_SRC emacs-lisp
(use-package cider
:ensure t
:commands (cider-jack-in cider))
#+END_SRC
*** Hy
#+name: programming
#+BEGIN_SRC emacs-lisp
(use-package hy-mode
:ensure t
:mode "\\.hy$")
#+END_SRC
** Erlang ** Erlang
#+name: programming #+name: programming
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp