branch: externals/corfu
commit 7739f8e39a642d28e07373cde796b684ae7333f6
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>
corfu-popupinfo: Indentation
---
extensions/corfu-popupinfo.el | 18 +++++++++---------
1 file changed, 9 insertions(+), 9 deletions(-)
diff --git a/extensions/corfu-popupinfo.el b/extensions/corfu-popupinfo.el
index 209973a203..376177a696 100644
--- a/extensions/corfu-popupinfo.el
+++ b/extensions/corfu-popupinfo.el
@@ -199,15 +199,15 @@ all values are in pixels relative to the origin. See
(alist-get 'right-margin-width
corfu--buffer-parameters))))
(max-height (* (default-line-height) corfu-popupinfo-max-height))
(max-width (+ margin (* cw corfu-popupinfo-max-width))))
- (if corfu-popupinfo-resize
- (with-current-buffer " *corfu-popupinfo*"
- (cl-letf* (((window-dedicated-p) nil)
- ((window-buffer) (current-buffer))
- (size (window-text-pixel-size
- nil (point-min) (point-max)
- max-width max-height)))
- (cons (min (+ margin (car size)) max-width)
- (min (cdr size) max-height))))
+ (if corfu-popupinfo-resize
+ (with-current-buffer " *corfu-popupinfo*"
+ (cl-letf* (((window-dedicated-p) nil)
+ ((window-buffer) (current-buffer))
+ (size (window-text-pixel-size
+ nil (point-min) (point-max)
+ max-width max-height)))
+ (cons (min (+ margin (car size)) max-width)
+ (min (cdr size) max-height))))
(cons max-width max-height))))
(defun corfu-popupinfo--frame-geometry (frame)
