[helpful] Make layer alias standard describe-functions

This commit is contained in:
Maximilian Wolff 2021-04-15 21:05:53 +00:00
parent 59ecf6a119
commit 347ac504d8
2 changed files with 6 additions and 5 deletions

View File

@ -143,7 +143,7 @@ seconds to load")
(with-current-buffer "*load-times*"
(goto-char (point-max))
(insert (format "[%.3f] Spacemacs finished initializing\n\n"
(float-time (time-since emacs-start-time)) )))))
(float-time (time-since emacs-start-time)))))))
(advice-add 'load :around #'spacemacs//load-timer)
(advice-add 'require :around #'spacemacs//load-timer)
@ -248,9 +248,7 @@ seconds to load")
func))
(if (stringp func)
(spacemacs/describe-ex-command func)
(if (configuration-layer/layer-usedp 'helpful)
(helpful-callable func)
(describe-function func))))))
(describe-function func)))))
(defun spacemacs/report-issue (arg)
"Open a spacemacs/report-issue-mode buffer prepopulated with

View File

@ -47,7 +47,10 @@
(spacemacs/set-leader-keys-for-major-mode 'helpful-mode
(kbd "q") 'helpful-kill-buffers)
(evil-define-key 'normal helpful-mode-map (kbd "gr") 'helpful-update)
(evil-define-key 'normal helpful-mode-map (kbd "q") 'quit-window)))
(evil-define-key 'normal helpful-mode-map (kbd "q") 'quit-window)
(defalias 'describe-function 'helpful-callable)
(defalias 'describe-variable 'helpful-variable)
(defalias 'describe-key 'helpful-key)))
(defun helpful/post-init-link-hint ()
(with-eval-after-load 'helpful