Minor refactor of doom/describe-active-minor-mode
This commit is contained in:
parent
4d017ae19e
commit
60e7b78739
1 changed files with 4 additions and 6 deletions
|
@ -176,13 +176,11 @@ current file is in, or d) the module associated with the current major mode (see
|
||||||
"Get information on an active minor mode. Use `describe-minor-mode' for a
|
"Get information on an active minor mode. Use `describe-minor-mode' for a
|
||||||
selection of all minor-modes, active or not."
|
selection of all minor-modes, active or not."
|
||||||
(interactive
|
(interactive
|
||||||
(list (completing-read "Minor mode: "
|
(list (completing-read "Minor mode: " (doom-active-minor-modes))))
|
||||||
(doom-active-minor-modes))))
|
|
||||||
(describe-minor-mode-from-symbol
|
(describe-minor-mode-from-symbol
|
||||||
(cl-typecase mode
|
(cond ((stringp mode) (intern mode))
|
||||||
(string (intern mode))
|
((symbolp mode) mode)
|
||||||
(symbol mode)
|
((error "Expected a symbol/string, got a %s" (type-of mode))))))
|
||||||
(t (error "Expected a symbol/string, got a %s" (type-of mode))))))
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun doom/what-face (&optional pos)
|
(defun doom/what-face (&optional pos)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue