diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-09-13 18:24:14 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-09-13 18:24:14 +0200 |
| commit | 6e6a3efa2e806738b4c88e67db1b9bc87969831d (patch) | |
| tree | 79ddb0a549a2b1b5b022ebe7fb87cc5f8fc422a8 /lisp/emacs-lisp | |
| parent | ef0c2e9940552e9b8612e8ae8c908466b2c99f0a (diff) | |
| download | emacs-6e6a3efa2e806738b4c88e67db1b9bc87969831d.tar.gz emacs-6e6a3efa2e806738b4c88e67db1b9bc87969831d.tar.bz2 emacs-6e6a3efa2e806738b4c88e67db1b9bc87969831d.zip | |
Remove a nil cl-case case
* lisp/emacs-lisp/testcover.el (testcover-coverage-combine):
Remove the nil case, which will never match (bug#51368).
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/testcover.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/testcover.el b/lisp/emacs-lisp/testcover.el index cd2e388ce42..760063d1f9d 100644 --- a/lisp/emacs-lisp/testcover.el +++ b/lisp/emacs-lisp/testcover.el @@ -637,8 +637,7 @@ argument is maybe, return maybe. Return 1value only if both arguments are 1value." (cl-case val (testcover-1value result) - (maybe (and result 'maybe)) - (nil nil))) + (maybe (and result 'maybe)))) (defun testcover-analyze-coverage-compose (forms func) "Analyze a list of FORMS for code coverage using FUNC. |