summaryrefslogtreecommitdiff
path: root/extensions/corfu-indexed.el
diff options
context:
space:
mode:
authorDaniel Mendler <mail@daniel-mendler.de>2023-02-04 03:38:24 +0100
committerDaniel Mendler <mail@daniel-mendler.de>2023-02-04 03:38:24 +0100
commita74f160c5b2210a6a3a4a13b1303b1ab2d36a334 (patch)
tree6a4172bb1421a3c0829d40d620f0aff1c64184b7 /extensions/corfu-indexed.el
parentc8d90901800866b41f45a5c2d3986cf9b05fb347 (diff)
Move methods below modes
Diffstat (limited to 'extensions/corfu-indexed.el')
-rw-r--r--extensions/corfu-indexed.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/extensions/corfu-indexed.el b/extensions/corfu-indexed.el
index 8621247..e68770f 100644
--- a/extensions/corfu-indexed.el
+++ b/extensions/corfu-indexed.el
@@ -56,6 +56,11 @@
'(corfu-insert corfu-complete)
"Commands that should be indexed.")
+;;;###autoload
+(define-minor-mode corfu-indexed-mode
+ "Prefix candidates with indices."
+ :global t :group 'corfu)
+
(cl-defmethod corfu--prepare :before (&context (corfu-indexed-mode (eql t)))
(when (and prefix-arg (memq this-command corfu-indexed--commands))
(let ((index (+ corfu--scroll
@@ -88,10 +93,5 @@
(cadr cand))))
(cons t cands)))
-;;;###autoload
-(define-minor-mode corfu-indexed-mode
- "Prefix candidates with indices."
- :global t :group 'corfu)
-
(provide 'corfu-indexed)
;;; corfu-indexed.el ends here