[elpa] externals/transient 8c0a3ac0a4 7/9: transient--show: Call transient--force-fixed-pitch earlier

[Jonas Bernoulli]

branch: externals/transient
commit 8c0a3ac0a4e98d5797f9a3a7e06d5d34eafe5b07
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    transient--show: Call transient--force-fixed-pitch earlier
    
    The fixed-pitch font may differ from the default face in size, so this
    could be done before the size of the window is calculated.
---
 lisp/transient.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lisp/transient.el b/lisp/transient.el
index ef1ff3e13e..083fcc0429 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -3599,6 +3599,8 @@ have a history of their own.")
                         (transient--heading-at-point))))
       (erase-buffer)
       (run-hooks 'transient-setup-buffer-hook)
+      (when transient-force-fixed-pitch
+        (transient--force-fixed-pitch))
       (setq window-size-fixed t)
       (when (bound-and-true-p tab-line-format)
         (setq tab-line-format nil))
@@ -3619,9 +3621,7 @@ have a history of their own.")
       (when (or transient--helpp transient--editp)
         (transient--insert-help))
       (when-let ((line (transient--separator-line)))
-        (insert line))
-      (when transient-force-fixed-pitch
-        (transient--force-fixed-pitch)))
+        (insert line)))
     (unless (window-live-p transient--window)
       (setq transient--window
             (display-buffer buf transient-display-buffer-action)))