about summary refs log tree commit diff stats
path: root/lisp/+elisp.el
blob: d2f018a87051ce4486815a265d5293e94cd2fe07 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
;;; +elisp.el -*- lexical-binding: t; -*-

;;; Code:

(defun +elisp-eval-region-or-buffer ()
  (interactive)
  (if (region-active-p)
      (eval-region (region-beginning) (region-end))
    (eval-buffer)))

;; Should I move this to `+pulse' ?
(defun +eval-region@pulse (advised beg end &rest args)
  "ADVICE to pulse an eval'd region."
  (apply advised beg end args)
  (pulse-momentary-highlight-region beg end))

(provide '+elisp)
;;; +elisp.el ends here