[improvement] Get a simple return on `s3fs::s3_file_system`

[asitemade4u]

It would be practical to have a simple return on the connection function, instead of the whole page of connection details the function is returning now. Maybe another enclosing function would do the trick:

validity <- s3fs::is_valid(s3fs::s3_file_system(
  aws_access_key_id = Sys.getenv("MINIO_KEY"),
  aws_secret_access_key = Sys.getenv("MINIO_PWD"),
  endpoint = glue::glue("http://{theenv$miosrv}")
))
(validity)

[DyfanJones]

I like this idea :) I happy to implement it :)