Update directory.R (#1973)

olivroy · web-flow · commit 41a2f0b583bf · 2024-05-13T10:35:16.000-07:00
diff --git a/R/directory.R b/R/directory.R
@@ -58,7 +58,7 @@ directory_has_files <- function(x) {
 
 check_directory_is_empty <- function(x) {
   if (directory_has_files(x)) {
-    ui_abort("{.path {pth(path)}} exists and is not an empty directory.")
+    ui_abort("{.path {pth(x)}} exists and is not an empty directory.")
   }
   invisible(x)
 }

Original file line number	Diff line number	Diff line change
`@@ -58,7 +58,7 @@ directory_has_files <- function(x) {`
`58`	`58`
`59`	`59`	`check_directory_is_empty <- function(x) {`
`60`	`60`	`if (directory_has_files(x)) {`
`61`		`- ui_abort("{.path {pth(path)}} exists and is not an empty directory.")`
	`61`	`+ ui_abort("{.path {pth(x)}} exists and is not an empty directory.")`
`62`	`62`	`}`
`63`	`63`	`invisible(x)`
`64`	`64`	`}`