branch: externals/posframe commit ecd148b8d546c1c4f746942ae44925df3218a2fa Author: Feng Shu <tuma...@163.com> Commit: Feng Shu <tuma...@163.com>
Indent code --- posframe.el | 23 ++++++++++++----------- 1 file changed, 12 insertions(+), 11 deletions(-) diff --git a/posframe.el b/posframe.el index daac142294..c9d928aec5 100644 --- a/posframe.el +++ b/posframe.el @@ -838,17 +838,18 @@ of `posframe-show'." posframe--last-posframe-pixel-position (setq posframe--last-poshandler-info info) (let* ((ref-position (plist-get info :ref-position)) - (position (funcall - (or (plist-get info :poshandler) - (let ((position (plist-get info :position))) - (cond ((integerp position) - #'posframe-poshandler-point-bottom-left-corner) - ((and (consp position) - (integerp (car position)) - (integerp (cdr position))) - #'posframe-poshandler-absolute-x-y) - (t (error "Posframe: have no valid poshandler"))))) - info)) + (position + (funcall + (or (plist-get info :poshandler) + (let ((position (plist-get info :position))) + (cond ((integerp position) + #'posframe-poshandler-point-bottom-left-corner) + ((and (consp position) + (integerp (car position)) + (integerp (cdr position))) + #'posframe-poshandler-absolute-x-y) + (t (error "Posframe: have no valid poshandler"))))) + info)) (x (car position)) (y (cdr position))) (if (not ref-position)