Get rid of extra quotes in urls. (#27)

r4ds · Jul 17, 2023 · ef78547 · ef78547
1 parent d17b800
commit ef78547
Show file tree

Hide file tree

Showing 5 changed files with 3 additions and 1 deletion.
diff --git a/R/html.R b/R/html.R
@@ -70,7 +70,9 @@
   return(
     xml2::xml_find_all(row, ".//td")[[col_number]] |>
       xml2::xml_find_all(".//a") |>
-      xml2::xml_attr("href")
+      xml2::xml_attr("href") |>
+      stringr::str_replace_all(stringr::fixed('\\\"'), '"') |>
+      stringr::str_remove_all('"')
   )
 }
 

diff --git a/R/sysdata.rda b/R/sysdata.rda
diff --git a/data/tt_datasets_metadata.rda b/data/tt_datasets_metadata.rda
diff --git a/data/tt_summary_tbl.rda b/data/tt_summary_tbl.rda
diff --git a/data/tt_urls_tbl.rda b/data/tt_urls_tbl.rda