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))))