From 642f8baea3631866515d60cda65027d4788c8770 Mon Sep 17 00:00:00 2001 From: wkmor1 Date: Tue, 5 Dec 2023 15:56:38 +0200 Subject: [PATCH] Sanitise collection data field names --- R/finbif_collections.R | 2 ++ 1 file changed, 2 insertions(+) diff --git a/R/finbif_collections.R b/R/finbif_collections.R index f3277dd4..8db0047d 100644 --- a/R/finbif_collections.R +++ b/R/finbif_collections.R @@ -308,6 +308,8 @@ get_collections <- function(col_obj) { col_names <- gsub("([a-z])([A-Z])", "\\1_\\L\\2", col_names, perl = TRUE) + col_names <- tolower(col_names) + structure(collections, names = col_names) }