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

Update modules/feature/eval

Browse source
This commit is contained in:
Henrik Lissner 2017-02-19 18:40:52 -05:00
parent 43d0247d61
commit 35ae1965a7
3 changed files with 42 additions and 38 deletions
Download patch file Download diff file Expand all files Collapse all files

19
modules/feature/eval/autoload/eval.el
View file

@ -49,22 +49,3 @@ elisp buffer). Otherwise forward the region to Quickrun."
(insert (current-kill 0)))))
(t (quickrun-replace-region beg end))))
;;;###autoload (autoload '+repl:eval-region "feature/repl/autoload/repl" nil t)
;;;###autoload (autoload '+repl:eval-region-and-replace "feature/repl/autoload/eval" nil t)
(@after evil
(evil-set-command-properties '+repl/eval-buffer :move-point nil :repeat nil)
(evil-set-command-properties '+repl/eval-region :move-point nil :repeat nil)
(evil-define-operator +repl:eval-region (beg end)
"Evaluate a region and, if large enough, prints its output to a popup buffer (if an
elisp buffer). Otherwise forward the region to Quickrun."
:move-point nil :repeat nil
(interactive "<r>")
(+repl/eval-region beg end))
(evil-define-operator +repl:eval-region-and-replace (beg end)
(interactive "<r>")
(+repl/eval-region-and-replace beg end)))

12
modules/feature/eval/autoload/evil.el Normal file
View file

@ -0,0 +1,12 @@
;;; feature/eval/autoload/evil.el
;;;###autoload (autoload '+repl:eval-region "feature/eval/autoload/evil" nil t)
(evil-define-operator +repl:eval-region (beg end)
(interactive "<r>")
(+repl/eval-region beg end))
;;;###autoload (autoload '+repl:eval-region-and-replace "feature/eval/autoload/evil" nil t)
(evil-define-operator +repl:eval-region-and-replace (beg end)
(interactive "<r>")
(+repl/eval-region-and-replace beg end))