diff options
| author | dr-scsi <59777257+dr-scsi@users.noreply.github.com> | 2022-11-08 09:35:51 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2022-11-08 09:35:51 +0100 |
| commit | 4ea3f80957194358ad9fe56d91e8a594a6ab7562 (patch) | |
| tree | 0369538b9b55d91a1e6dc5e24e08444666a4ee6a /extensions/corfu-indexed.el | |
| parent | 2e4c6d327eac15ffbf06f2a4b3031036819a6d7f (diff) | |
Simplify the definition of the minor-mode (#243)
* extensions/corfu-indexed.el (corfu-indexed-mode): Use (if ...)
instead of (cond ...) with two clauses for minor-mode definition.
Diffstat (limited to 'extensions/corfu-indexed.el')
| -rw-r--r-- | extensions/corfu-indexed.el | 13 |
1 files changed, 6 insertions, 7 deletions
diff --git a/extensions/corfu-indexed.el b/extensions/corfu-indexed.el index a50773e..3bdbf39 100644 --- a/extensions/corfu-indexed.el +++ b/extensions/corfu-indexed.el @@ -94,15 +94,14 @@ (define-minor-mode corfu-indexed-mode "Prefix candidates with indices." :global t :group 'corfu - (cond - (corfu-indexed-mode - (advice-add #'corfu--affixate :filter-return #'corfu-indexed--affixate) - (dolist (cmd corfu-indexed--commands) - (advice-add cmd :around #'corfu-indexed--handle-prefix))) - (t + (if corfu-indexed-mode + (progn + (advice-add #'corfu--affixate :filter-return #'corfu-indexed--affixate) + (dolist (cmd corfu-indexed--commands) + (advice-add cmd :around #'corfu-indexed--handle-prefix))) (advice-remove #'corfu--affixate #'corfu-indexed--affixate) (dolist (cmd corfu-indexed--commands) - (advice-remove cmd #'corfu-indexed--handle-prefix))))) + (advice-remove cmd #'corfu-indexed--handle-prefix)))) (provide 'corfu-indexed) ;;; corfu-indexed.el ends here |