fix add_death

neurogenomics · Mar 9, 2025 · 25306b3 · 25306b3
1 parent 2bc5607
commit 25306b3
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 2 deletions.
diff --git a/NEWS.md b/NEWS.md
@@ -1,9 +1,11 @@
 # HPOExplorer 1.0.5
 
 ## New features
-
 * Store HPO ontology in default `KGExplorer` cache dir to reduce disk storage.
 
+## Bug fixes
+* `add_death`: Fix incorrect column checking.
+
 # HPOExplorer 1.0.4
 
 ## Bug fixes

diff --git a/R/add_death.R b/R/add_death.R
@@ -50,7 +50,8 @@ add_death <- function(phenos,
   AgeOfDeath_earliest <- AgeOfDeath_name <- NULL;
 
   if(!all(c("AgeOfDeath",
-            "AgeOfDeath_name") %in% names(phenos))){
+            "AgeOfDeath_names" # NOTE: Gets turned from "AgeOfDeath_name" to "AgeOfDeath_names" during aggregation
+            ) %in% names(phenos))){
     messager("Annotating phenos with AgeOfDeath.")
     phenos <- add_disease(phenos = phenos,
                           all.x = all.x,