refactor: fix assert

gdrplatform · Oct 30, 2024 · 691eb06 · 691eb06
1 parent 8689767
commit 691eb06
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/add_annotation.R b/R/add_annotation.R
@@ -92,11 +92,12 @@ annotate_dt_with_cell_line <- function(
 ) {
   checkmate::assert_data_table(data)
   checkmate::assert_data_table(cell_line_annotation)
-  checkmate::assert_names(names(cell_line_annotation), must.include = c(cellline, unlist(add_clid)))
 
   cellline <- gDRutils::get_env_identifiers("cellline")
   add_clid <- gDRutils::get_header("add_clid")
 
+  checkmate::assert_names(names(cell_line_annotation), must.include = c(cellline, unlist(add_clid)))
+
   # Remove existing annotations if any
   existing_cols <- intersect(unlist(add_clid), names(data))
   if (length(existing_cols) > 0) {