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

Refactor +helm*replace-prompt

Browse source 
In case +helm-global-prompt is nil, which will effectively disable this
advice.
This commit is contained in:
Henrik Lissner 2018-06-15 22:10:40 +02:00
parent 1db3830bf3
commit cdcc4eec5d
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 5 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -54,10 +54,11 @@
;;; Helm hacks
(defun +helm*replace-prompt (plist)
"Globally replace helm prompts with `+helm-global-prompt'."
(if (keywordp (car plist))
(plist-put plist :prompt +helm-global-prompt)
(setf (nth 2 plist) +helm-global-prompt)
plist))
(cond ((not +helm-global-prompt) plist)
((keywordp (car plist))
(plist-put plist :prompt +helm-global-prompt))
((setf (nth 2 plist) +helm-global-prompt)
plist)))
(advice-add #'helm :filter-args #'+helm*replace-prompt)
(defun +helm*hide-header (&rest _)