[elpa] externals/marginalia de30fcd 4/5: marginalia-annotate-variable: Obtain value before let-binding the print variables

[ELPA Syncer]

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

    marginalia-annotate-variable: Obtain value before let-binding the print 
variables
---
 marginalia.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/marginalia.el b/marginalia.el
index 9f86ee0..e9e5588 100644
--- a/marginalia.el
+++ b/marginalia.el
@@ -449,12 +449,13 @@ keybinding since CAND includes it."
   (when-let (sym (intern-soft cand))
     (marginalia--fields
      ((marginalia--symbol-class sym) :face 'marginalia-type)
-     ((let ((print-escape-newlines t)
+     ((let ((val (if (boundp sym) (symbol-value sym) 'unbound))
+            (print-escape-newlines t)
             (print-escape-control-characters t)
             (print-escape-multibyte t)
             (print-level 20)
             (print-length 500))
-        (prin1-to-string (if (boundp sym) (symbol-value sym) 'unbound)))
+        (prin1-to-string val))
       :truncate (/ marginalia-truncate-width 3) :face 'marginalia-variable)
      ((documentation-property sym 'variable-documentation)
       :truncate marginalia-truncate-width :face 'marginalia-documentation))))