message for finding varspec entity id

VEuPathDB · Nov 8, 2023 · c86c680 · c86c680
1 parent 61c607c
commit c86c680
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/methods-Megastudy.R b/R/methods-Megastudy.R
@@ -138,7 +138,7 @@ setMethod('as.data.table', signature('StudySpecificVocabulariesByVariable'), fun
 #should this be an s4 method?
 findEntityIdColumnNameForVariableSpec <- function(varSpec, entityIdColumns) {
   if (!inherits(varSpec, 'VariableSpec')) stop("The first argument must be of the S4 class `VariableSpec`.")
-
+  message("varSpec: ", veupathUtils::getColName(varSpec))
   return(entityIdColumns[grepl(varSpec@entityId, entityIdColumns)])
 }