small fix in get_ids function

canmod · Apr 26, 2024 · a37bf2a · a37bf2a
1 parent 10cf60b
commit a37bf2a
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/iidda/R/metadata_tools.R b/R/iidda/R/metadata_tools.R
@@ -598,7 +598,7 @@ convert_harmonized_metadata = function(tidy_metadata, harmonized_metadata, tidy_
   get_ids = function(tracking_table, column_name, lookup_column_name, id_vector) {
     tracking_column = as.character(tracking_table[[column_name]])
     lookup_column = as.character(tracking_table[[lookup_column_name]])
-    unique(tracking_column[lookup_column %in% prep_scripts])
+    unique(tracking_column[lookup_column %in% id_vector])
   }
   dataset_ids = get_ids(tidy_metadata$PrepDependencies, "tidy_dataset", "prep_script", prep_scripts)
   digitization_ids = get_ids(tidy_metadata$DigitizationDependencies, "digitization", "tidy_dataset", dataset_ids)