[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/posframe ecd148b8d5 3/4: Indent code
From: |
ELPA Syncer |
Subject: |
[elpa] externals/posframe ecd148b8d5 3/4: Indent code |
Date: |
Mon, 12 Dec 2022 22:57:59 -0500 (EST) |
branch: externals/posframe
commit ecd148b8d546c1c4f746942ae44925df3218a2fa
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@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)