jon.recoil.org / monopam-myspace
forked from anil.recoil.org/monopam-myspace
My aggregated monorepo of OCaml code, automaintained
0
fork

Configure Feed

Select the types of activity you want to include in your feed.

Merge branch 'cmstatefield'

Jon Ludlam's Agent 13d4ef5d b75cc223

+1 -1
+1 -1
x-ocaml/src/editor.ml
··· 65 65 @@ List.map (fun (at, msg) -> 66 66 let at = min at (String.length doc) in 67 67 let at = find_line_ends at doc in 68 - let at = min at (max 0 (cm_len - 1)) in 68 + let at = min at cm_len in 69 69 (at, msg)) 70 70 @@ List.concat 71 71 @@ List.map (fun (loc, lst) -> List.map (fun m -> (loc, m)) lst)