Update doAuth.R