diff options
| author | Daniel Mendler <mail@daniel-mendler.de> | 2023-02-04 03:38:24 +0100 |
|---|---|---|
| committer | Daniel Mendler <mail@daniel-mendler.de> | 2023-02-04 03:38:24 +0100 |
| commit | a74f160c5b2210a6a3a4a13b1303b1ab2d36a334 (patch) | |
| tree | 6a4172bb1421a3c0829d40d620f0aff1c64184b7 /extensions/corfu-indexed.el | |
| parent | c8d90901800866b41f45a5c2d3986cf9b05fb347 (diff) | |
Move methods below modes
Diffstat (limited to 'extensions/corfu-indexed.el')
| -rw-r--r-- | extensions/corfu-indexed.el | 10 |
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 |
