remove else clause in loadFraserObject

gagneurlab · May 8, 2024 · 42d0a08 · 42d0a08
1 parent be67137
commit 42d0a08
Showing 1 changed file with 0 additions and 5 deletions.
diff --git a/R/saveHDF5Objects.R b/R/saveHDF5Objects.R
@@ -73,11 +73,6 @@ loadFraserDataSet <- function(dir, name=NULL, file=NULL, upgrade=FALSE){
     # ensure strandSpecific slot is up-to-date with new vector format
     if("strandSpecific" %in% slotNames(fds)){
         strandSpecific(fds) <- slot(fds, "strandSpecific")    
-    } else{
-        # adapt type of strandSpecific if needed (changed logical -> integer)
-        if(is.logical(strandSpecific(fds))){
-            strandSpecific(fds) <- as.integer(strandSpecific(fds))
-        }
     }