Small cleanup: with(future::plan(...), local = TRUE)

[HenrikBengtsson]

A minor comment, but these days, you can replace:

httpgd/tests/testthat/helper-server.R

Lines 7 to 14 in 087ebf5

	(function() {
	future::plan("multisession")
	v <- future::value(future::future({
	httr::GET(...)
	}))
	future::plan("sequential")
	v
	})()

with:

 (function() { 
   with(future::plan("multisession"), local = TRUE)
   future::value(future::future({ 
     httr::GET(...) 
   })) 
 })()