ensure app_files is not a list for rsconnect::deployApp (#112)

mslynch · web-flow · commit b796640f789b · 2023-06-30T10:14:40.000+02:00
diff --git a/R/publish.R b/R/publish.R
@@ -111,7 +111,7 @@ quarto_publish_doc <- function(input,
     }
 
     # include any explicit resources with app files
-    app_files <- unique(c(app_files, resources))
+    app_files <- unique(c(app_files, unlist(resources)))
 
     # deploy doc
     if (render == "server") {

Original file line number	Diff line number	Diff line change
`@@ -111,7 +111,7 @@ quarto_publish_doc <- function(input,`
`111`	`111`	`}`
`112`	`112`
`113`	`113`	`# include any explicit resources with app files`
`114`		`- app_files <- unique(c(app_files, resources))`
	`114`	`+ app_files <- unique(c(app_files, unlist(resources)))`
`115`	`115`
`116`	`116`	`# deploy doc`
`117`	`117`	`if (render == "server") {`