[elpa] externals/corfu-doc 9d81c522f6 56/95: Simplify code

[ELPA Syncer]

branch: externals/corfu-doc
commit 9d81c522f6f0cd34094186543306196b43ff4785
Author: Yuwei Tian <ibluefocus@outlook.com>
Commit: Yuwei Tian <ibluefocus@outlook.com>

    Simplify code
---
 corfu-doc.el | 14 ++++----------
 1 file changed, 4 insertions(+), 10 deletions(-)

diff --git a/corfu-doc.el b/corfu-doc.el
index 48088a600f..cbfc7ebcaa 100644
--- a/corfu-doc.el
+++ b/corfu-doc.el
@@ -237,24 +237,18 @@ FWIDTH and FHEIGHT."
          (cf-parent-frame-x (car cf-parent-frame-pos))
          (cf-parent-frame-y (cadr cf-parent-frame-pos))
          (cf-parent-frame-width (frame-pixel-width cf-parent-frame))
+         (lfw (alist-get 'left-fringe corfu-doc--frame-parameters 0))
+         (rfw (alist-get 'right-fringe corfu-doc--frame-parameters 0))
          (cf-doc-frame-width
            (or fwidth
                (if (not corfu-doc-resize-frame)
                    ;; left border + left margin + inner width + right margin + 
right border
-                   (+ 1
-                      (alist-get 'left-fringe corfu-doc--frame-parameters 0)
-                      (* (frame-char-width) corfu-doc-max-width)
-                      (alist-get 'right-fringe corfu-doc--frame-parameters 0)
-                      1)
+                   (+ 1 lfw (* (frame-char-width) corfu-doc-max-width) rfw 1)
                  (fit-frame-to-buffer corfu-doc--frame
                                       corfu-doc-max-height nil
                                       corfu-doc-max-width nil)
                  ;; outer width - left border - left margin - right margin - 
right border
-                 (- (frame-pixel-width corfu-doc--frame)
-                    1
-                    (alist-get 'left-fringe corfu-doc--frame-parameters 0)
-                    (alist-get 'right-fringe corfu-doc--frame-parameters 0)
-                    1))))
+                 (- (frame-pixel-width corfu-doc--frame) 1 lfw rfw 1))))
          (cf-doc-frame-height
            (or fheight
                (if (not corfu-doc-resize-frame)