formating

2025-08-20 12:51:31 +01:00
parent c21d1b8205
commit c4f3e921a3
5 changed files with 127 additions and 26 deletions
--- a/fcore/move.sml
+++ b/fcore/move.sml
@@ -15,8 +15,8 @@ struct
      let
        val {searchList, bufferModifyTime, ...} = app
      in
-        Finish.buildTextAndClear (app, buffer, cursorIdx, searchList, [],
-        bufferModifyTime)
+        Finish.buildTextAndClear
+          (app, buffer, cursorIdx, searchList, [], bufferModifyTime)
      end
    else
      (* move LineGap to cursorIdx, which is necessary for finding newCursorIdx *)
@@ -67,7 +67,8 @@ struct
      val buffer = LineGap.goToIdx (cursorIdx, buffer)
      val cursorIdx = Fn.fMove (buffer, cursorIdx, count)
    in
-      Finish.buildTextAndClear (app, buffer, cursorIdx, searchList, [], bufferModifyTime)
+      Finish.buildTextAndClear
+        (app, buffer, cursorIdx, searchList, [], bufferModifyTime)
    end
 end