From aab5bfd074e57d06a79e39d7c7c4760e1f385a06 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Mon, 17 Oct 2022 21:41:28 -0500 Subject: Bankruptcy 9 --- lisp/+elisp.el | 18 ------------------ 1 file changed, 18 deletions(-) delete mode 100644 lisp/+elisp.el (limited to 'lisp/+elisp.el') diff --git a/lisp/+elisp.el b/lisp/+elisp.el deleted file mode 100644 index 3eafbf3..0000000 --- a/lisp/+elisp.el +++ /dev/null @@ -1,18 +0,0 @@ -;;; +elisp.el -*- lexical-binding: t; -*- - -;;; Code: - -(defun +elisp-eval-region-or-buffer () - (interactive) - (if (region-active-p) - (eval-region (region-beginning) (region-end)) - (+eval-region@pulse (lambda (_ _) (eval-buffer)) (point-min) (point-max)))) - -;; 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 -- cgit 1.4.1-21-gabe81