🐛 properly handle outputs with len > 1

Ryan Patrick Kyle · Ryan Patrick Kyle · commit ae7b1b00319f · 2019-08-09T16:17:13.000-04:00
diff --git a/R/dash.R b/R/dash.R
@@ -293,7 +293,7 @@ Dash <- R6::R6Class(
  
         # inspect the output_value to determine whether any outputs have no_update
         # objects within them; these should not be updated
-        if (class(output_value) == "no_update") {
+        if (length(output_value) == 1 && class(output_value) == "no_update") {
           response$body <- character(1) # return empty string
           response$status <- 204L
         }

Original file line number	Diff line number	Diff line change
`@@ -293,7 +293,7 @@ Dash <- R6::R6Class(`
`293`	`293`
`294`	`294`	`# inspect the output_value to determine whether any outputs have no_update`
`295`	`295`	`# objects within them; these should not be updated`
`296`		`- if (class(output_value) == "no_update") {`
	`296`	`+ if (length(output_value) == 1 && class(output_value) == "no_update") {`
`297`	`297`	`response$body <- character(1) # return empty string`
`298`	`298`	`response$status <- 204L`
`299`	`299`	`}`