[elpa] externals/marginalia 35cb523 127/241: add comment

[Stefan Monnier]

branch: externals/marginalia
commit 35cb523bafba824cbe65e83f40b1b4942d5009ab
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    add comment
---
 marginalia.el | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/marginalia.el b/marginalia.el
index 06bf91b..193c088 100644
--- a/marginalia.el
+++ b/marginalia.el
@@ -623,7 +623,10 @@ looking for a regexp that matches the prompt."
 (defmacro marginalia--context (&rest body)
   "Setup annotator context around BODY."
   (let ((w (make-symbol "w")))
+    ;; Take the window width of the current window (minibuffer window!)
     `(let ((,w (window-width)))
+       ;; Switch to the originally selected window before entering the 
minibuffer
+       ;; We need the `selected-window' fallback for Embark Occur.
        (with-selected-window (or (minibuffer-selected-window) 
(selected-window))
          (let ((marginalia-truncate-width (min (/ ,w 2) 
marginalia-truncate-width))
                (marginalia--separator (if (>= ,w 
marginalia-separator-threshold) "    " " "))