Bug fix in create
authorPaul Hoffman <phoffman@nygenome.org>
Wed, 13 Dec 2017 19:15:41 +0000 (14:15 -0500)
committerPaul Hoffman <phoffman@nygenome.org>
Wed, 13 Dec 2017 19:15:41 +0000 (14:15 -0500)
R/loom.R

index f69de92931ef19da67b7903434f9eab4a7b6b110..f833fa06d706ad036948e5baa944fbda810084b9 100644 (file)
--- a/R/loom.R
+++ b/R/loom.R
@@ -860,7 +860,7 @@ create <- function(
 ) {
   mode <- ifelse(test = overwrite, yes = 'w', no = 'w-')
   if (file.exists(filename) && !overwrite) {
-    stop(paste('File', file, 'already exists!'))
+    stop(paste('File', filename, 'already exists!'))
   }
   if (!is.matrix(x = data)) {
     data <- as.matrix(x = data)