From 4be1f49d08f839bfe49b8f00a22ba7a907b33e0a Mon Sep 17 00:00:00 2001 From: Daniel Mendler Date: Fri, 27 Dec 2024 12:37:34 +0100 Subject: corfu-expand: Use cached metadata --- corfu.el | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/corfu.el b/corfu.el index 744e073..96d4e91 100644 --- a/corfu.el +++ b/corfu.el @@ -1344,9 +1344,8 @@ input has been expanded." (corfu-complete) (pcase-let* ((`(,beg ,end ,table ,pred . ,_) completion-in-region--data) (pt (max 0 (- (point) beg))) - (str (buffer-substring-no-properties beg end)) - (metadata (completion-metadata (substring str 0 pt) table pred))) - (pcase (completion-try-completion str table pred pt metadata) + (str (buffer-substring-no-properties beg end))) + (pcase (completion-try-completion str table pred pt corfu--metadata) ('t (goto-char end) (corfu--done str 'finished corfu--candidates) -- cgit v1.0