[elpa] externals/vertico ebe8a383b9 2/2: Code readability

[ELPA Syncer]

branch: externals/vertico
commit ebe8a383b972fec6930a38bfc16746299939f6ea
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Code readability
---
 extensions/vertico-flat.el | 6 +++---
 extensions/vertico-grid.el | 6 +++---
 2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/extensions/vertico-flat.el b/extensions/vertico-flat.el
index 2fa031ce04..659131d97b 100644
--- a/extensions/vertico-flat.el
+++ b/extensions/vertico-flat.el
@@ -126,9 +126,9 @@
   "Flat, horizontal display for Vertico."
   :global t :group 'vertico
   ;; Shrink current minibuffer window
-  (when-let* ((win (active-minibuffer-window))
-              ((not (frame-root-window-p win))))
-    (window-resize win (- (window-pixel-height win)) nil nil 'pixelwise))
+  (when-let (win (active-minibuffer-window))
+    (unless (frame-root-window-p win)
+      (window-resize win (- (window-pixel-height win)) nil nil 'pixelwise)))
   (cond
    (vertico-flat-mode
     (add-to-list 'minor-mode-map-alist `(vertico--input . ,vertico-flat-map))
diff --git a/extensions/vertico-grid.el b/extensions/vertico-grid.el
index 31c59e1988..815083a019 100644
--- a/extensions/vertico-grid.el
+++ b/extensions/vertico-grid.el
@@ -160,9 +160,9 @@ When scrolling beyond this limit, candidates may be 
truncated."
   "Grid display for Vertico."
   :global t :group 'vertico
   ;; Shrink current minibuffer window
-  (when-let* ((win (active-minibuffer-window))
-              ((not (frame-root-window-p win))))
-    (window-resize win (- (window-pixel-height win)) nil nil 'pixelwise))
+  (when-let (win (active-minibuffer-window))
+    (unless (frame-root-window-p win)
+      (window-resize win (- (window-pixel-height win)) nil nil 'pixelwise)))
   (cond
    (vertico-grid-mode
     (add-to-list 'minor-mode-map-alist `(vertico--input . ,vertico-grid-map))