Could `font_google()` be a little more informative?

[gadenbuie]

htmltools::renderTags(htmltools::tags$style(sass::font_google("Source Code", local = TRUE)))
#> Error in curl::curl_download(url, dest, handle = handle, quiet = FALSE, : HTTP error 400.

It took me a while to realize the problem was my spelling of "Source Code" which should have been "Source Code Pro".

The problem is that the above error is where you end up while trying to create a reprex. In the original context of an R Markdown yaml front matter, I was defining a few fonts and it wasn't even clear from the error that the fonts were the issue.