method import f_which_one () =
match current_conflict with
None -> ()
| Some cpl ->
let tag = wview#buffer#create_tag [`FOREGROUND (f_which_one colors)] in
wview#buffer#insert ~tags: [tag] (f_which_one cpl);
wview#misc#grab_focus ()