diff --git a/fcore/cursor.sml b/fcore/cursor.sml index 00f3d29..abd67e9 100644 --- a/fcore/cursor.sml +++ b/fcore/cursor.sml @@ -1411,7 +1411,7 @@ struct val chr = String.sub (str, strPos) in if chr = findChr then - absIdx + 1 + lastNonLine else let val lastNonLine = diff --git a/shf b/shf index 3b81554..f1d06d1 100755 Binary files a/shf and b/shf differ