From 335e8af2ff7467d1f3fad5aed52163492a684ce0 Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson2@worcester.edu>
Date: Sun, 30 Apr 2023 10:47:55 -0400
Subject: Force re-layout after updating GC stats.

---
 catbird/overlay.scm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/catbird/overlay.scm b/catbird/overlay.scm
index 8d1306c..1d39c9e 100644
--- a/catbird/overlay.scm
+++ b/catbird/overlay.scm
@@ -283,6 +283,8 @@
           (number->string (assq-ref stats 'protected-objects)))
     (set! (text (stat-label 'gc-times))
           (number->string (assq-ref stats 'gc-times))))
+  ;; Force layout update.
+  (layout (& gc-display table))
   (resize (& gc-display background)
           (width (& gc-display table))
           (height (& gc-display table))))
-- 
cgit v1.2.3