emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

nit: minor comment revision and refactors

Browse source
This commit is contained in:
Henrik Lissner 2022-09-16 16:25:48 +02:00
parent 7ffe0df8eb
commit 732d87ac3e
No known key found for this signature in database
GPG key ID: B60957CA074D39A3
7 changed files with 13 additions and 20 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/cli/help.el
View file

@ -306,7 +306,8 @@ OPTIONS:
(cl-defun doom-cli-help--render-commands (commands &key prefix grouped? docs? (inline? t))
(with-temp-buffer
(let* ((doom-print-indent 0)
(commands (seq-group-by (fn! (if grouped? (doom-cli-prop (doom-cli-get % t) :group))) (nreverse commands)))
(commands (seq-group-by (fn! (if grouped? (doom-cli-prop (doom-cli-get % t) :group)))
(nreverse commands)))
(toplevel (assq nil commands))
(rest (remove toplevel commands))
(drop (if prefix (length prefix) 0))

4
lisp/cli/packages.el
View file

@ -739,8 +739,8 @@ it doesn't make sense to slack."
;; We can't intercept C-g, so no point displaying any options for this key
;; when C-c is the proper way to abort batch Emacs.
(delq! "C-g" actions 'assoc)
;; HACK These are associated with opening dired or magit, which isn't
;; possible in tty Emacs, so...
;; HACK: These are associated with opening dired or magit, which isn't
;; possible in tty Emacs, so...
(delq! "e" actions 'assoc)
(delq! "g" actions 'assoc)
(if (doom-cli-context-suppress-prompts-p doom-cli--context)