oops automation calls private secure

gergness · malecki · commit ff7ab66ce935 · 2021-07-02T14:12:07.000-04:00
diff --git a/R/folders.R b/R/folders.R
@@ -482,7 +482,7 @@ generateOrganizeCommand <- function(dataset) {
     }
     root_cmds <- organize_recurse(dataset, "ROOT", "/")
     hidden_cmds <- organize_recurse(hiddenFolder(dataset), "HIDDEN", "/")
-    secure_cmds <- organize_recurse(privateFolder(dataset), "PRIVATE", "/")
+    secure_cmds <- organize_recurse(privateFolder(dataset), "SECURE", "/")
 
     paste0(c(unlist(root_cmds), unlist(hidden_cmds), unlist(secure_cmds)), collapse = "\n")
 }

Original file line number	Diff line number	Diff line change
`@@ -482,7 +482,7 @@ generateOrganizeCommand <- function(dataset) {`
`482`	`482`	`}`
`483`	`483`	`root_cmds <- organize_recurse(dataset, "ROOT", "/")`
`484`	`484`	`hidden_cmds <- organize_recurse(hiddenFolder(dataset), "HIDDEN", "/")`
`485`		`- secure_cmds <- organize_recurse(privateFolder(dataset), "PRIVATE", "/")`
	`485`	`+ secure_cmds <- organize_recurse(privateFolder(dataset), "SECURE", "/")`
`486`	`486`
`487`	`487`	`paste0(c(unlist(root_cmds), unlist(hidden_cmds), unlist(secure_cmds)), collapse = "\n")`
`488`	`488`	`}`