github/shiny
1
1
Fork 0
mirror of https://github.com/rstudio/shiny.git synced 2026-02-05 12:15:14 -05:00
Code Issues Packages Projects Releases Wiki Activity

Revert switch to jsonlite

Browse Source 
This reverts commits deffc90, ab4dc64, and 0755579, returning to RJSONIO.
The purpose of this is to prepare for a maintenance release for 0.11
without the switch to jsonlite, to reduce the risk of new bugs.
This commit is contained in:
Winston Chang
2015-02-06 10:47:42 -06:00
parent b74e93f3a4
commit 040ae293fb
11 changed files with 26 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
inst/tests/test-input-handler.R
View File

@@ -15,7 +15,7 @@ test_that("Date converts to date", {
x <- "2013/01/01"
class(x) <- "shiny.date"
handler <- inputHandlers$get('shiny.date')
expect_identical(
expect_identical(
handler(x), as.Date(unclass(x))
)
})
@@ -24,7 +24,7 @@ test_that("List of dates converts to vector", {
x <- list("2013/01/01", "2014/01/01")
class(x) <- "shiny.date"
handler <- inputHandlers$get('shiny.date')
expect_identical(
expect_identical(
handler(x), as.Date(unlist(x))
)
})
@@ -41,7 +41,7 @@ test_that("Matrix converts list of lists to matrix", {
test_that("Nulls are not converted to NAs in parsing", {
msg <- charToRaw("{\"method\":\"init\",\"data\":{\"obs\":500,\"nullObs\":null}}")
expect_identical(
decodeMessage(msg),
list(method="init", data=list(obs=500L, nullObs=NULL))
decodeMessage(msg),
list(method="init", data=list(obs=500, nullObs=NULL))
)
})
})