diff --git a/R/AllClasses.R b/R/AllClasses.R index 314c4182..f7ecfd8d 100644 --- a/R/AllClasses.R +++ b/R/AllClasses.R @@ -107,13 +107,7 @@ ArchRProject <- function( .validInput(input = showLogo, name = "showLogo", valid = "boolean") .validInput(input = threads, name = "threads", valid = c("integer")) - if(grepl(" ", outputDirectory)){ - stop("outputDirectory cannot have a space in the path! Path : ", outputDirectory) - } dir.create(outputDirectory,showWarnings=FALSE) - if(grepl(" ", normalizePath(outputDirectory))){ - stop("outputDirectory cannot have a space in the full path! Full path : ", normalizePath(outputDirectory)) - } sampleDirectory <- file.path(normalizePath(outputDirectory), "ArrowFiles") dir.create(sampleDirectory,showWarnings=FALSE) @@ -498,10 +492,6 @@ saveArchRProject <- function( .validInput(input = overwrite, name = "overwrite", valid = "boolean") .validInput(input = load, name = "load", valid = "boolean") - if(grepl(" ", outputDirectory)){ - stop("outputDirectory cannot have a space in the path! Path : ", outputDirectory) - } - dir.create(outputDirectory, showWarnings=FALSE) outputDirectory <- normalizePath(outputDirectory) outDirOld <- normalizePath(getOutputDirectory(ArchRProj))