From 9e76a38ece650bffce906eee76627b68a4c55b15 Mon Sep 17 00:00:00 2001
From: Humza Shahid <humzasaur@gmail.com>
Date: Sat, 13 Sep 2025 01:16:29 +0100
Subject: [PATCH] fix bug in 'TextBuilderUtils.initEnv'. When we have a wide
 enough space that we can centre the text, we set the 'scrollColumnEnd' field
 to the length of how many columns we can display. However, we want
 'scrollColumnEnd' to contain the last column that can be drawn, not the
 length of how many columns we can draw. So now we have fixed tis.

---
 fcore/text-builder/text-builder-utils.sml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/fcore/text-builder/text-builder-utils.sml b/fcore/text-builder/text-builder-utils.sml
index 8299d53..a8e21ad 100644
--- a/fcore/text-builder/text-builder-utils.sml
+++ b/fcore/text-builder/text-builder-utils.sml
@@ -133,7 +133,7 @@ struct
         , startY = 5
 
         , scrollColumnStart = visualScrollColumn
-        , scrollColumnEnd = TC.textLineCount
+        , scrollColumnEnd = visualScrollColumn + TC.textLineCount
 
         , lastLineNumber =
             let