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

Merge pull request #2402 from snyball/develop

Browse source 
Fix #2397: helm posframe
This commit is contained in:
Henrik Lissner 2020-01-23 17:20:58 -05:00 • committed by GitHub
commit 2c536cf948
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
2 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
modules/completion/helm/autoload/posframe.el
View file

@ -23,6 +23,7 @@ bottom, which is easier on the eyes on big displays."
(setq +helm--posframe-buffer buffer) (setq +helm--posframe-buffer buffer)
:position (point) :position (point)
:poshandler +helm-posframe-handler :poshandler +helm-posframe-handler
:respect-header-line helm-echo-input-in-header-line
:width :width
(max (cl-typecase .width (max (cl-typecase .width
(integer .width) (integer .width)

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

@ -71,6 +71,9 @@ be negative.")
:init :init
(when (featurep! +childframe) (when (featurep! +childframe)
;; If this is set to 'iconify-top-level then Emacs will be minimized upon
;; helm completion.
(setq iconify-child-frame 'make-invisible)
(setq helm-display-function #'+helm-posframe-display-fn)) (setq helm-display-function #'+helm-posframe-display-fn))
(let ((fuzzy (featurep! +fuzzy))) (let ((fuzzy (featurep! +fuzzy)))
@ -111,6 +114,9 @@ be negative.")
(advice-add #'helm-display-mode-line :override #'+helm--hide-mode-line) (advice-add #'helm-display-mode-line :override #'+helm--hide-mode-line)
(advice-add #'helm-ag-show-status-default-mode-line :override #'ignore) (advice-add #'helm-ag-show-status-default-mode-line :override #'ignore)
;; Hide minibuffer if `helm-echo-input-in-header-line'
(add-hook 'helm-minibuffer-set-up-hook #'helm-hide-minibuffer-maybe)
;; Use helpful instead of describe-* to display documentation ;; Use helpful instead of describe-* to display documentation
(dolist (fn '(helm-describe-variable helm-describe-function)) (dolist (fn '(helm-describe-variable helm-describe-function))
(advice-add fn :around #'doom-use-helpful-a))) (advice-add fn :around #'doom-use-helpful-a)))