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 ()