diff --git a/fcore/text-builder/text-builder-with-cursor.sml b/fcore/text-builder/text-builder-with-cursor.sml index 45751c8..2275404 100644 --- a/fcore/text-builder/text-builder-with-cursor.sml +++ b/fcore/text-builder/text-builder-with-cursor.sml @@ -58,7 +58,7 @@ struct else (* bin search lines *) let - val searchPos = BinSearch.equalOrMore (pos + 1, #searchList env) + val searchPos = BinSearch.equalOrMore (pos + 1, line) in if searchPos = ~1 then (* next line is not in this node *)