Work around R CMD check issue
Suppress warnings when setInternet2(FALSE) previously called

If setInternet(FALSE) was called and some internet-using function was
called, then download() gives this warning:
  In setInternet2(TRUE) : internet routines were already initialized
Add source_url function