emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Doom and gloom when things go boom, in Dexter's laaaaab

Browse source
This commit is contained in:
Henrik Lissner 2015-05-14 23:50:20 -04:00
parent 4f3c2c7800
commit a5056b71ed
17 changed files with 125 additions and 107 deletions
Download patch file Download diff file Expand all files Collapse all files

7
init/init-dev.el
View file

@ -62,13 +62,13 @@ If ARG is nil this function calls `recompile', otherwise it calls
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(evil-define-operator my:eval-region (beg end)
:keep-visual t
:move-point nil
(interactive "<r>")
(cond ((eq major-mode 'emacs-lisp-mode)
(eval-region beg end))
(t
(let ((interp (my--get-interpreter)))
(let ((interp (my--get-interpreter))
(max-mini-window-height 1))
(when interp (shell-command-on-region beg end interp))))))
(evil-define-command my:eval-buffer ()
@ -76,7 +76,8 @@ If ARG is nil this function calls `recompile', otherwise it calls
(cond ((eq major-mode 'emacs-lisp-mode)
(eval-buffer))
(t
(let ((interp (my--get-interpreter)))
(let ((interp (my--get-interpreter))
(max-mini-window-height 1))
(when interp (shell-command-on-region (point-min) (point-max) interp))))))
(defun my--get-interpreter ()