Update source, eask-core.el

emacs-eask · Dec 13, 2024 · 6d4255e · 6d4255e
1 parent e570b7f
commit 6d4255e
Showing 1 changed file with 10 additions and 0 deletions.
diff --git a/eask-core.el b/eask-core.el
@@ -3585,6 +3585,16 @@ Modified from function `ecukes-cli/run'."
   (ecukes-run files))
 
 ;; ~/lisp/test/ert-runner.el
+(defun eask-test-ert-runner--run (fnc &rest args)
+  "Run around function `ert-runner/run'.
+
+Arguments FNC and ARGS are used for advice `:around'.
+
+Handle the argument ARGS when command arguments are specified."
+  (let* ((patterns (eask-args))
+         (files (eask-expand-file-specs patterns)))
+    (setq args files))
+  (apply fnc args))
 
 ;; ~/lisp/test/ert.el
 (defvar eask-test-ert--message-loop nil