[elpa] externals/cape c8c0a9f9a6 134/146: Simplify

[ELPA Syncer]

branch: externals/cape
commit c8c0a9f9a6910fa99202b859090d49535da869d1
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Simplify
---
 cape.el | 17 ++++++++---------
 1 file changed, 8 insertions(+), 9 deletions(-)

diff --git a/cape.el b/cape.el
index 368522e569..79652347cb 100644
--- a/cape.el
+++ b/cape.el
@@ -1017,17 +1017,16 @@ case sensitive instead."
 ;;;###autoload
 (defun cape-repair-misbehaving-capf (capf)
   "Repair a misbehaving CAPF."
-  (catch 'cape--misbehaving-capf
+  (catch 'cape--capf-result
     (save-mark-and-excursion
       (atomic-change-group
-        (pcase (funcall capf)
-          ((and res `(,beg ,end ,_table . ,_plist)
-                (guard (integer-or-marker-p beg))
-                (guard (integer-or-marker-p end)))
-           (ignore beg end)
-           res)
-          (_
-           (throw 'cape--misbehaving-capf nil)))))))
+        (throw 'cape--capf-result
+               (pcase (funcall capf)
+                 ((and res `(,beg ,end ,_table . ,_plist)
+                       (guard (integer-or-marker-p beg))
+                       (guard (integer-or-marker-p end)))
+                  (ignore beg end)
+                  res)))))))
 
 ;;;###autoload
 (defun cape-interactive-capf (capf)