clean up some dead code

2025-08-06 00:16:50 +01:00
parent faa55abd3d
commit f0f28a1318
8 changed files with 58 additions and 112 deletions
--- a/fcore/search/search-line-gap.sml
+++ b/fcore/search/search-line-gap.sml
@@ -76,16 +76,4 @@ struct
      end
    else
      (buffer, SearchList.empty)
-
-  fun buildIntoApp (app, buffer, searchString) =
-    if String.size searchString > 0 then
-      let
-        val buffer = LineGap.goToEnd buffer
-        val searchList = search (buffer, searchString)
-        val buffer = LineGap.goToStart buffer
-      in
-        AppWith.searchList (app, searchList, buffer, searchString)
-      end
-    else
-      app
 end