clearer error message

VEuPathDB · Oct 11, 2023 · 6c239d9 · 6c239d9
1 parent 1b88c70
commit 6c239d9
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/class-Megastudy.R b/R/class-Megastudy.R
@@ -84,7 +84,7 @@ check_megastudy <- function(object) {
 
   if (!!length(ancestor_id_cols)) {
     if (!all(ancestor_id_cols %in% names(df))) {
-      msg <- paste("Not all ancestor ID columns are present in abundance data.frame")
+      msg <- paste("Not all ancestor ID columns are present in data.frame")
       errors <- c(errors, msg)
     }
   } else {
@@ -112,4 +112,4 @@ Megastudy <- setClass("Megastudy", representation(
     data = 'data.table',
     ancestorIdColumns = 'character',
     studySpecificVocabularies = 'StudySpecificVocabulariesByVariableList'
-), validity = check_megastudy)
+), validity = check_megastudy)