Skip to content

Commit

Permalink
Fix }
Browse files Browse the repository at this point in the history
  • Loading branch information
cansavvy committed Apr 5, 2022
1 parent 8ecd6f0 commit 70df770
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion scripts/url-check.R
Original file line number Diff line number Diff line change
Expand Up @@ -38,7 +38,7 @@ get_urls <- function(file) {
# Read in a file and return the urls from it
content <- readLines(file)
content <- grep("http[s]?://", content, value = TRUE)
url_pattern <- "http[s]?://.+?[\"|\\)| |,|}]"
url_pattern <- "http[s]?://.+?[\"|\\)| |,|\\}]"
urls <- stringr::str_extract(content, url_pattern)
urls <- urls[!is.na(urls)]
if (length(urls) > 0 ){
Expand Down

0 comments on commit 70df770

Please sign in to comment.