humza/sml-projects
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix bug in 'k' motion: when we move from any other line to line 0, always unconditionally decrement column by 1

Browse Source
This commit is contained in:
Humza Shahid
2025-09-22 07:02:20 +01:00
parent 3128647a5f
commit e6ea96f995
1 changed files with 3 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
fcore/normal-mode/normal-move.sml
View File

@@ -209,13 +209,12 @@ struct
val cursorLineNumber = LineGap.idxToLineNumber (cursorIdx, buffer) val cursorLineNumber = LineGap.idxToLineNumber (cursorIdx, buffer)
val newCursorLineNumber = Int.max (cursorLineNumber - count, 0) val newCursorLineNumber = Int.max (cursorLineNumber - count, 0)
val column = cursorIdx - startOfLine
val column =
if newCursorLineNumber = 0 then Int.max (column - 1, 0) else column
val buffer = LineGap.goToLine (newCursorLineNumber, buffer) val buffer = LineGap.goToLine (newCursorLineNumber, buffer)
val lineIdx = val lineIdx =
LineGap.lineNumberToIdx (newCursorLineNumber, buffer) + 1 LineGap.lineNumberToIdx (newCursorLineNumber, buffer) + 1
val column = cursorIdx - startOfLine
val column = if newCursorLineNumber = 0 then column - 1 else column
in in
finishMoveCursorUpDown finishMoveCursorUpDown
(app, newCursorLineNumber, buffer, column, lineIdx) (app, newCursorLineNumber, buffer, column, lineIdx)