previously forgot to draw char in text builder, but we do that now

2025-09-12 14:02:38 +01:00
parent 2ad7623848
commit 77a64ae794
5 changed files with 22 additions and 8 deletions
--- a/fcore/text-builder/text-builder-with-cursor.sml
+++ b/fcore/text-builder/text-builder-with-cursor.sml
@@ -207,7 +207,8 @@ struct
                in Utils.makeCursorOnChr (chr, posX, posY, env) :: acc
                end
              else
-                Utils.makeCursor (posX, posY, env) :: acc
+                Utils.makeChr (chr, posX, posY, env)
+                :: Utils.makeCursor (posX, posY, env) :: acc
          in
            build
              ( pos + 1
--- a/fcore/text-builder/text-builder-with-highlight.sml
+++ b/fcore/text-builder/text-builder-with-highlight.sml
@@ -276,7 +276,7 @@ struct
                    Utils.makeHighlightChr (chr, posX, posY, env)
                    :: Utils.makeHighlight (posX, posY, env) :: acc
                  else
-                    acc
+                    Utils.makeChr (chr, posX, posY, env) :: acc
              in
                build
                  ( pos + 1