let get_config key =
  try List.assoc key !config
  with Not_found -> raise (Missing_configuration_item key)