summaryrefslogtreecommitdiff
path: root/cape.el
diff options
context:
space:
mode:
authorDaniel Mendler <mail@daniel-mendler.de>2021-12-13 12:30:02 +0100
committerDaniel Mendler <mail@daniel-mendler.de>2021-12-13 12:30:02 +0100
commit700c9d7bc221e04e259947f8fb7a908bf1909bc0 (patch)
tree478018586101718c990e175febcfc333cc579c7c /cape.el
parent5319e343bbaf272ac0d0b376b5b37f09be800314 (diff)
Remove cape-repair-misbehaving-capf
I added a better fix by @jakanakaevangeli directly to Corfu.
Diffstat (limited to 'cape.el')
-rw-r--r--cape.el17
1 files changed, 0 insertions, 17 deletions
diff --git a/cape.el b/cape.el
index 474a887..aa71afc 100644
--- a/cape.el
+++ b/cape.el
@@ -1015,23 +1015,6 @@ case sensitive instead."
`(,beg ,end ,(cape--noninterruptible-table table) ,@plist)))))
;;;###autoload
-(defun cape-repair-misbehaving-capf (capf)
- "Repair a misbehaving CAPF."
- (save-mark-and-excursion
- (let ((beg (copy-marker (point)))
- (end (copy-marker (point) t)))
- (with-silent-modifications
- (unwind-protect
- (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))
- (when (/= beg end)
- (delete-region beg end)))))))
-
-;;;###autoload
(defun cape-interactive-capf (capf)
"Create interactive completion function from CAPF."
(lambda (&optional interactive)