diff --git a/R/read_wi.R b/R/read_wi.R index 4609d1b4..ee68003e 100644 --- a/R/read_wi.R +++ b/R/read_wi.R @@ -294,7 +294,7 @@ read_wi <- function(directory = ".") { ), habitat = NA_character_, tags = .data$subproject_name, # Set subproject as tag - comments = paste(c(.data$event_description, .data$camera_functioning), collapse = " | "), # TODO: check with other dataset + comments = paste(.data$event_description, .data$remarks, .data$camera_functioning, sep = " | "), # TODO: check with other dataset `_id` = NA_character_ )