Function write_doctor_bundle 

fn write_doctor_bundle(report: &DoctorReport, dir: &Path) -> Result<()>