diff options
| author | Noam Postavsky | 2017-03-28 09:40:45 -0400 |
|---|---|---|
| committer | Noam Postavsky | 2017-03-28 09:44:24 -0400 |
| commit | 7d27f5d8f48b8f184eb93f64461e01c1481c8fb4 (patch) | |
| tree | bf8044b5f9f039b0ef20baa02b5d09df569f0261 | |
| parent | 969fad4068e44ae2de7632dd656c8013bb60c566 (diff) | |
| download | emacs-7d27f5d8f48b8f184eb93f64461e01c1481c8fb4.tar.gz emacs-7d27f5d8f48b8f184eb93f64461e01c1481c8fb4.zip | |
* lisp/emacs-lisp/ert.el (ert-run-tests): Make INTERACTIVE arg optional.
| -rw-r--r-- | lisp/emacs-lisp/ert.el | 2 |
1 files changed, 1 insertions, 1 deletions
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." | |||
| 1236 | (funcall listener 'test-ended stats test result)) | 1236 | (funcall listener 'test-ended stats test result)) |
| 1237 | (setf (ert--stats-current-test stats) nil)))) | 1237 | (setf (ert--stats-current-test stats) nil)))) |
| 1238 | 1238 | ||
| 1239 | (defun ert-run-tests (selector listener interactively) | 1239 | (defun ert-run-tests (selector listener &optional interactively) |
| 1240 | "Run the tests specified by SELECTOR, sending progress updates to LISTENER." | 1240 | "Run the tests specified by SELECTOR, sending progress updates to LISTENER." |
| 1241 | (let* ((tests (ert-select-tests selector t)) | 1241 | (let* ((tests (ert-select-tests selector t)) |
| 1242 | (stats (ert--make-stats tests selector))) | 1242 | (stats (ert--make-stats tests selector))) |