pass NULL as null for value and configuration

timelyportfolio · timelyportfolio · commit d671a7e503b4 · 2019-04-10T21:06:08.000-05:00
diff --git a/R/reacttools.R b/R/reacttools.R
@@ -145,10 +145,10 @@ createReactShinyInput <- function(inputId,
     container(id = inputId, class = class),
     htmltools::tags$script(id = sprintf("%s_value", inputId),
                            type = "application/json",
-                           jsonlite::toJSON(value, auto_unbox = TRUE)),
+                           jsonlite::toJSON(value, auto_unbox = TRUE, null = "null")),
     htmltools::tags$script(id = sprintf("%s_configuration", inputId),
                            type = "application/json",
-                           jsonlite::toJSON(configuration, auto_unbox = TRUE)),
+                           jsonlite::toJSON(configuration, auto_unbox = TRUE, null = "null")),
     dependencies
   )
 }

Original file line number	Diff line number	Diff line change
`@@ -145,10 +145,10 @@ createReactShinyInput <- function(inputId,`
`145`	`145`	`container(id = inputId, class = class),`
`146`	`146`	`htmltools::tags$script(id = sprintf("%s_value", inputId),`
`147`	`147`	`type = "application/json",`
`148`		`- jsonlite::toJSON(value, auto_unbox = TRUE)),`
	`148`	`+ jsonlite::toJSON(value, auto_unbox = TRUE, null = "null")),`
`149`	`149`	`htmltools::tags$script(id = sprintf("%s_configuration", inputId),`
`150`	`150`	`type = "application/json",`
`151`		`- jsonlite::toJSON(configuration, auto_unbox = TRUE)),`
	`151`	`+ jsonlite::toJSON(configuration, auto_unbox = TRUE, null = "null")),`
`152`	`152`	`dependencies`
`153`	`153`	`)`
`154`	`154`	`}`