[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/vertico 4a7da56b02: vertico-buffer: Reformatting
From: |
ELPA Syncer |
Subject: |
[elpa] externals/vertico 4a7da56b02: vertico-buffer: Reformatting |
Date: |
Sun, 28 Jan 2024 12:59:03 -0500 (EST) |
branch: externals/vertico
commit 4a7da56b02c6aefff8f6b4574a530a7cb54bc21a
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
vertico-buffer: Reformatting
---
extensions/vertico-buffer.el | 46 ++++++++++++++++++++++----------------------
1 file changed, 23 insertions(+), 23 deletions(-)
diff --git a/extensions/vertico-buffer.el b/extensions/vertico-buffer.el
index b028970c62..7573b379ab 100644
--- a/extensions/vertico-buffer.el
+++ b/extensions/vertico-buffer.el
@@ -94,29 +94,29 @@
(defun vertico-buffer--redisplay (win)
"Redisplay window WIN."
- (when-let ((mbwin (active-minibuffer-window)))
- (when (eq (window-buffer mbwin) (current-buffer))
- (unless (eq win mbwin)
- (setq-local truncate-lines (< (window-point win)
- (* 0.8 (window-width win))))
- (set-window-point win (point))
- (set-window-hscroll win 0))
- (when vertico-buffer-hide-prompt
- (window-resize mbwin (- (window-pixel-height mbwin)) nil nil
'pixelwise)
- (set-window-vscroll mbwin 3))
- (when transient-mark-mode
- (with-silent-modifications
- (vertico--remove-face (point-min) (point-max) 'region)
- (when (use-region-p)
- (add-face-text-property
- (max (minibuffer-prompt-end) (region-beginning))
- (region-end) 'region))))
- (let ((old cursor-in-non-selected-windows)
- (new (and (eq (selected-window) mbwin)
- (if (memq cursor-type '(nil t)) 'box cursor-type))))
- (unless (eq new old)
- (setq-local cursor-in-non-selected-windows new)
- (force-mode-line-update t))))))
+ (when-let ((mbwin (active-minibuffer-window))
+ ((eq (window-buffer mbwin) (current-buffer))))
+ (unless (eq win mbwin)
+ (setq-local truncate-lines (< (window-point win)
+ (* 0.8 (window-width win))))
+ (set-window-point win (point))
+ (set-window-hscroll win 0))
+ (when vertico-buffer-hide-prompt
+ (window-resize mbwin (- (window-pixel-height mbwin)) nil nil 'pixelwise)
+ (set-window-vscroll mbwin 3))
+ (when transient-mark-mode
+ (with-silent-modifications
+ (vertico--remove-face (point-min) (point-max) 'region)
+ (when (use-region-p)
+ (add-face-text-property
+ (max (minibuffer-prompt-end) (region-beginning))
+ (region-end) 'region))))
+ (let ((old cursor-in-non-selected-windows)
+ (new (and (eq (selected-window) mbwin)
+ (if (memq cursor-type '(nil t)) 'box cursor-type))))
+ (unless (eq new old)
+ (setq-local cursor-in-non-selected-windows new)
+ (force-mode-line-update t)))))
(defun vertico-buffer--setup ()
"Setup buffer display."
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/vertico 4a7da56b02: vertico-buffer: Reformatting,
ELPA Syncer <=