move buffer around when calling 'SearchList.buildRange'

2025-09-30 05:40:57 +01:00
parent e03eecf940
commit 45fbd85183
4 changed files with 18 additions and 15 deletions
--- a/fcore/normal-mode/normal-search-mode.sml
+++ b/fcore/normal-mode/normal-search-mode.sml
@@ -29,7 +29,8 @@ struct
      val searchCursorIdx = searchCursorIdx + 1

      val buffer = LineGap.goToIdx (cursorIdx - 1111, buffer)
-      val tempSearchList = buildTempSearchList (searchString, buffer, cursorIdx)
+      val (buffer, tempSearchList) =
+        buildTempSearchList (searchString, buffer, cursorIdx)
    in
      NormalSearchFinish.onSearchChanged
        ( app
@@ -120,7 +121,7 @@ struct

        val {cursorIdx, buffer, ...} = app
        val buffer = LineGap.goToIdx (cursorIdx - 1111, buffer)
-        val tempSearchList =
+        val (buffer, tempSearchList) =
          buildTempSearchList (searchString, buffer, cursorIdx)
      in
        NormalSearchFinish.onSearchChanged