reimplement vi's 'b' command

2025-07-20 17:36:33 +01:00
parent 33474fb5ae
commit 146953c25d
2 changed files with 52 additions and 6 deletions
--- a/fcore/cursor.sml
+++ b/fcore/cursor.sml
@@ -974,8 +974,7 @@ struct
    end

  (* equivalent of vi's 'b' command *)
-  fun prevWord (lineGap, cursorIdx) =
-    toPrevWord (lineGap, cursorIdx, helpPrevWord)
+  val prevWord = ViWordDfa.startOfCurrentWord

  (* equivalent of vi's 'B' command *)
  val prevWORD = ViWORDDfa.startOfCurrentWORD