]> git.eshelyaron.com Git - emacs.git/commitdiff
Remove a nil cl-case case
authorLars Ingebrigtsen <larsi@gnus.org>
Tue, 13 Sep 2022 16:24:14 +0000 (18:24 +0200)
committerLars Ingebrigtsen <larsi@gnus.org>
Tue, 13 Sep 2022 16:24:14 +0000 (18:24 +0200)
* lisp/emacs-lisp/testcover.el (testcover-coverage-combine):
Remove the nil case, which will never match (bug#51368).

lisp/emacs-lisp/testcover.el

index cd2e388ce428d5ab59862578e60a162be8d24cac..760063d1f9d4960122a91b2f935935b9a282354c 100644 (file)
@@ -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.