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

refactor(helm): reformat and revise comments

Browse source 
Ref: #6676
Co-authored-by: johanwiden <johanwiden@users.noreply.github.com>
This commit is contained in:
Henrik Lissner 2023-02-23 22:39:04 -05:00
parent 928902213f
commit 8789e2e5c6
No known key found for this signature in database
GPG key ID: B60957CA074D39A3
2 changed files with 37 additions and 35 deletions
Download patch file Download diff file Expand all files Collapse all files

58
modules/completion/helm/config.el
View file

@ -23,23 +23,6 @@ Can be negative.")
(use-package! helm-mode
:hook (doom-first-input . helm-mode)
:init
(map! [remap apropos] #'helm-apropos
[remap find-library] #'helm-locate-library
[remap bookmark-jump] #'helm-bookmarks
[remap execute-extended-command] #'helm-M-x
[remap find-file] #'helm-find-files
[remap locate] #'helm-locate
[remap imenu] #'helm-semantic-or-imenu
[remap noop-show-kill-ring] #'helm-show-kill-ring
[remap persp-switch-to-buffer] #'+helm/workspace-mini
[remap switch-to-buffer] #'helm-buffers-list
[remap projectile-find-file] #'+helm/projectile-find-file
[remap projectile-recentf] #'helm-projectile-recentf
[remap projectile-switch-project] #'helm-projectile-switch-project
[remap projectile-switch-to-buffer] #'helm-projectile-switch-to-buffer
[remap recentf-open-files] #'helm-recentf
[remap yank-pop] #'helm-show-kill-ring)
:config
;; helm is too heavy for `find-file-at-point'
(add-to-list 'helm-completing-read-handlers-alist (cons #'find-file-at-point nil)))
@ -57,11 +40,29 @@ Can be negative.")
helm-display-buffer-default-width nil
helm-display-buffer-default-height 0.25
;; When calling `helm-semantic-or-imenu', don't immediately jump to
;; symbol at point
;; symbol at point.
helm-imenu-execute-action-at-once-if-one nil
;; disable special behavior for left/right, M-left/right keys.
;; Disable special behavior for left/right, M-left/right keys.
helm-ff-lynx-style-map nil)
(map! [remap apropos] #'helm-apropos
[remap find-library] #'helm-locate-library
[remap bookmark-jump] #'helm-bookmarks
[remap execute-extended-command] #'helm-M-x
[remap find-file] #'helm-find-files
[remap ibuffer-find-file] #'helm-find-files
[remap locate] #'helm-locate
[remap imenu] #'helm-semantic-or-imenu
[remap noop-show-kill-ring] #'helm-show-kill-ring
[remap persp-switch-to-buffer] #'+helm/workspace-mini
[remap switch-to-buffer] #'helm-buffers-list
[remap projectile-find-file] #'+helm/projectile-find-file
[remap projectile-recentf] #'helm-projectile-recentf
[remap projectile-switch-project] #'helm-projectile-switch-project
[remap projectile-switch-to-buffer] #'helm-projectile-switch-to-buffer
[remap recentf-open-files] #'helm-recentf
[remap yank-pop] #'helm-show-kill-ring)
(when (modulep! :editor evil +everywhere)
(setq helm-default-prompt-display-function #'+helm--set-prompt-display))
@ -79,8 +80,9 @@ Can be negative.")
helm-projectile-fuzzy-match fuzzy
helm-recentf-fuzzy-match fuzzy
helm-semantic-fuzzy-match fuzzy)
;; Make sure that we have helm-multi-matching or fuzzy matching,
;; (as prescribed by the fuzzy flag) also in the following cases:
;; Make sure that we have helm-multi-matching or fuzzy matching, (as
;; prescribed by the fuzzy flag) also in the following cases:
;;
;; - helmized commands that use `completion-at-point' and similar functions
;; - native commands that fall back to `completion-styles' like `helm-M-x'
@ -115,8 +117,7 @@ Can be negative.")
(use-package! helm-flx
:when (modulep! +fuzzy)
:hook (helm-mode . helm-flx-mode)
:config (helm-flx-mode +1))
:hook (helm-mode . helm-flx-mode))
(after! helm-rg
@ -160,6 +161,7 @@ Can be negative.")
'(org-set-tags . helm-org-completing-read-tags))))
;; DEPRECATED: Remove when projectile is replaced with project.el
(use-package! helm-projectile
:commands (helm-projectile-find-file
helm-projectile-recentf
@ -171,9 +173,11 @@ Can be negative.")
(set-keymap-parent helm-projectile-find-file-map helm-map))
(setq ivy-height 20) ; for `swiper-isearch'
(after! swiper-helm
(setq swiper-helm-display-function
(use-package! swiper-helm
:defer t
:config
(setq ivy-height 20
swiper-helm-display-function
(lambda (buf &optional _resume) (pop-to-buffer buf)))
(global-set-key [remap swiper] #'swiper-helm)
(add-to-list 'swiper-font-lock-exclude #'+doom-dashboard-mode nil #'eq))
@ -184,8 +188,8 @@ Can be negative.")
(use-package! helm-icons
:after helm
:when (modulep! +icons)
:hook (helm-mode . helm-icons-enable)
:init
(setq helm-icons-provider 'all-the-icons)
:config