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

completion/helm: fix +childframe

Browse source
This commit is contained in:
Henrik Lissner 2021-02-16 11:44:59 -05:00
parent 91f8d3e5d0
commit 28b3ad4529
2 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -24,14 +24,14 @@ bottom, which is easier on the eyes on big displays."
:position (point) :position (point)
:poshandler +helm-posframe-handler :poshandler +helm-posframe-handler
:respect-header-line helm-echo-input-in-header-line :respect-header-line helm-echo-input-in-header-line
:width :min-width
(max (cl-typecase .width (max (cl-typecase .width
(integer .width) (integer .width)
(float (truncate (* (frame-width) .width))) (float (truncate (* (frame-width) .width)))
(function (funcall .width)) (function (funcall .width))
(t 0)) (t 0))
.min-width) .min-width)
:height :min-height
(max (cl-typecase .height (max (cl-typecase .height
(integer .height) (integer .height)
(float (truncate (* (frame-height) .height))) (float (truncate (* (frame-height) .height)))

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

@ -12,7 +12,7 @@ be negative.")
(defvar +helm-posframe-parameters (defvar +helm-posframe-parameters
'((internal-border-width . 8) '((internal-border-width . 8)
(width . 0.5) (width . 0.65)
(height . 0.35) (height . 0.35)
(min-width . 80) (min-width . 80)
(min-height . 16)) (min-height . 16))