From 5e71b2afa51477a7e82e39c5ade965663ef3bfce Mon Sep 17 00:00:00 2001 From: iantaylor-NOAA Date: Tue, 28 Jul 2026 15:07:37 -0700 Subject: [PATCH] fix bug in check for valid URL --- R/convert_output.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/convert_output.R b/R/convert_output.R index c7adde34..8ba3f2cc 100644 --- a/R/convert_output.R +++ b/R/convert_output.R @@ -103,7 +103,7 @@ convert_output <- function( url_pattern <- "^(https?|ftp|file):\\/\\/[-A-Za-z0-9+&@#\\/%?=~_|!:,.;]*[-A-Za-z0-9+&@#\\/%=~_|]$" if (grepl(url_pattern, file)) { check <- tryCatch({ - headers <- utils::curlGetHeaders(file) + headers <- curlGetHeaders(file) attributes(headers)[["status"]] }, error = function(e) { 404