add equivalent of vi's 'F'

2024-10-26 21:21:33 +01:00
parent 01213fb2fb
commit 22ca7c5ed4
3 changed files with 77 additions and 19 deletions
--- a/fcore/app-update.sml
+++ b/fcore/app-update.sml
@@ -264,7 +264,7 @@ struct
        handleNextChr (count, app, Cursor.toNextChr, newCmd)
    | #"F" => 
        (* to chr, backward *) 
-        clearMode app
+        handleNextChr (count, app, Cursor.toPrevChr, newCmd)
    | #"g" => 
        (* go *) 
        clearMode app