blob: 6628670481d92b027d8bdeca157271cd73807417 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
|
;;; help-utils --- Help Additions and Preferences -*- lexical-binding: t; -*-
;; author Craig Jennings <c@cjennings.net>
;;; Commentary:
;;; Code:
(setq help-window-select t) ;; Always select the help buffer in a separate window
(global-set-key (kbd "C-h P") 'list-packages) ;; bring up the package menu
;;;; ---------------------------- Helpful ----------------------------
(use-package helpful
:defer .5
:bind
("C-h f" . helpful-callable)
("C-h v" . helpful-variable)
("C-h k" . helpful-key)
("C-h F" . helpful-function)
("C-h C" . helpful-command)
("C-h ." . helpful-at-point)
("C-h o" . helpful-symbol) ;; overrides 'describe-symbol' keybinding
:config
(setq counsel-describe-function-function #'helpful-callable)
(setq counsel-describe-variable-function #'helpful-variable))
;;;; ------------------------------ Man ------------------------------
(use-package man
:defer 1
:ensure nil ;; built-in
:bind ("C-h M" . man))
;;;; ------------------------------ Info -----------------------------
(use-package info
:defer 1
:ensure nil ;; built-in
:bind
(:map Info-mode-map
("m" . cj/bookmark-set-and-save) ;; note:overrides menu selection
("M" . Info-menu)) ;; so menu selection goes here
:preface
(defun open-with-info-mode ()
(interactive)
(let ((file-name (buffer-file-name)))
(kill-buffer (current-buffer))
(info file-name)))
:hook
(info-mode . info-persist-history-mode)
:init
;; add personal info files in emacs config assets directory
;; BUG: This causes an error on launch
(push (concat user-emacs-directory "assets/info") Info-directory-list)
(add-to-list 'auto-mode-alist '("\\.info\\'" . open-with-info-mode)))
;;;; ---------------------------- Devdocs ----------------------------
(use-package devdocs
:defer 1
:config
(global-set-key (kbd "C-h D s") 'devdocs-search)
(global-set-key (kbd "C-h D b") 'devdocs-peruse)
(global-set-key (kbd "C-h D l") 'devdocs-lookup)
(global-set-key (kbd "C-h D i") 'devdocs-install)
(global-set-key (kbd "C-h D d") 'devdocs-delete)
(global-set-key (kbd "C-h D u") 'devdocs-update-all)
(define-key devdocs-mode-map "b" 'devdocs-go-back)
(define-key devdocs-mode-map "f" 'devdocs-go-forward))
;;;; ------------------------------- TLDR ------------------------------
(use-package tldr
:defer 1
:bind ("C-h T" . tldr))
;;;; -------------------------- Wiki-Summary -------------------------
(use-package wiki-summary
:defer 1
:bind ("C-h W" . wiki-summary))
(provide 'help-utils)
;;; help-utils.el ends here
|