add timeout option for pact_download

[ernestguevarra]

using {withr}, set new timout option...something like this:

withr::with_options(
  new = list(timeout = 100),
  command = pact_download(....)
)