a bit of refactoring

2025-08-31 06:28:05 +01:00
parent 542da2229c
commit a86befdea8
10 changed files with 203 additions and 193 deletions
--- a/fcore/move.sml
+++ b/fcore/move.sml
@@ -15,7 +15,7 @@ struct
      let
        val {searchList, bufferModifyTime, ...} = app
      in
-        Finish.buildTextAndClear
+        NormalFinish.buildTextAndClear
          (app, buffer, cursorIdx, searchList, [], bufferModifyTime)
      end
    else
@@ -67,7 +67,7 @@ struct
      val buffer = LineGap.goToIdx (cursorIdx, buffer)
      val cursorIdx = Fn.fMove (buffer, cursorIdx, count)
    in
-      Finish.buildTextAndClear
+      NormalFinish.buildTextAndClear
        (app, buffer, cursorIdx, searchList, [], bufferModifyTime)
    end
 end