From a940d07e4be9fafa83615142837ca7e2aa6dd4a7 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Thu, 24 Oct 2019 19:23:17 -0400 Subject: [PATCH] tools/eval: minor refactors --- modules/tools/eval/autoload/eval.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/modules/tools/eval/autoload/eval.el b/modules/tools/eval/autoload/eval.el index f4c9e8f33..6a129a2be 100644 --- a/modules/tools/eval/autoload/eval.el +++ b/modules/tools/eval/autoload/eval.el @@ -6,14 +6,14 @@ (interactive) (cond ((assq major-mode +eval-runners) (+eval/region (point-min) (point-max))) - (t (quickrun)))) + ((quickrun)))) ;;;###autoload (defun +eval/region (beg end) "Evaluate a region between BEG and END and display the output." (interactive "r") (let ((load-file-name buffer-file-name)) - (if-let* ((runner (cdr (assq major-mode +eval-runners)))) + (if-let (runner (cdr (assq major-mode +eval-runners))) (funcall runner beg end) (quickrun-region beg end))))