From: Noam Postavsky Date: Tue, 28 Mar 2017 13:40:45 +0000 (-0400) Subject: * lisp/emacs-lisp/ert.el (ert-run-tests): Make INTERACTIVE arg optional. X-Git-Tag: emacs-26.0.90~522^2~26 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7d27f5d8f48b8f184eb93f64461e01c1481c8fb4;p=emacs.git * lisp/emacs-lisp/ert.el (ert-run-tests): Make INTERACTIVE arg optional. --- diff --git a/lisp/emacs-lisp/ert.el b/lisp/emacs-lisp/ert.el index 611c67311bc..e7387e463cb 100644 --- a/lisp/emacs-lisp/ert.el +++ b/lisp/emacs-lisp/ert.el @@ -1236,7 +1236,7 @@ SELECTOR is the selector that was used to select TESTS." (funcall listener 'test-ended stats test result)) (setf (ert--stats-current-test stats) nil)))) -(defun ert-run-tests (selector listener interactively) +(defun ert-run-tests (selector listener &optional interactively) "Run the tests specified by SELECTOR, sending progress updates to LISTENER." (let* ((tests (ert-select-tests selector t)) (stats (ert--make-stats tests selector)))