fix some type errors

2025-09-29 15:02:40 +01:00
parent 8f49cdca13
commit fd321c2f14
5 changed files with 2 additions and 63 deletions
--- a/fcore/normal-mode/normal-finish.sml
+++ b/fcore/normal-mode/normal-finish.sml
@@ -42,7 +42,6 @@ struct
        , windowWidth
        , windowHeight
        , searchList
-        , searchString
        , visualScrollColumn
        )
      val drawMsg = Vector.concat drawMsg
@@ -110,7 +109,6 @@ struct
        , newWidth
        , newHeight
        , searchList
-        , searchString
        , visualScrollColumn
        )
      val drawMsg = Vector.concat drawMsg
@@ -156,7 +154,6 @@ struct
        , windowWidth
        , windowHeight
        , searchList
-        , searchString
        , visualScrollColumn
        )
      val drawMsg = Vector.concat drawMsg