[elpa] externals/vertico 2cde6fd 40/48: Simplify

[Stefan Monnier]

branch: externals/vertico
commit 2cde6fd1e4bbf4ca1c128b0e5488db613e1d30d7
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Simplify
---
 minicomp.el | 22 ++++++++++------------
 1 file changed, 10 insertions(+), 12 deletions(-)

diff --git a/minicomp.el b/minicomp.el
index 728ac9e..c61d958 100644
--- a/minicomp.el
+++ b/minicomp.el
@@ -423,18 +423,16 @@
   (interactive "P")
   (unless arg
     (minicomp-insert))
-  (cond
-   ((let ((input (minibuffer-contents-no-properties)))
-      (or (memq minibuffer--require-match '(nil confirm-after-completion))
-          (equal "" input)
-          (test-completion input
-                           minibuffer-completion-table
-                           minibuffer-completion-predicate)))
-    (exit-minibuffer))
-   ((eq minibuffer--require-match 'confirm)
-    (when (eq (ignore-errors (read-char "Confirm")) 13)
-      (exit-minibuffer)))
-   (t (message "Match required"))))
+  (let ((input (minibuffer-contents-no-properties)))
+    (if (or (memq minibuffer--require-match '(nil confirm-after-completion))
+            (equal "" input)
+            (test-completion input
+                             minibuffer-completion-table
+                             minibuffer-completion-predicate)
+            (and (eq minibuffer--require-match 'confirm)
+                 (eq (ignore-errors (read-char "Confirm")) 13)))
+        (exit-minibuffer)
+      (message "Match required"))))
 
 (defun minicomp-exit-input ()
   "Exit minibuffer with input."