diff --git a/DESCRIPTION b/DESCRIPTION index ad0657f..535d6ed 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,6 +1,6 @@ Package: toastui Title: Interactive Tables, Calendars and Charts for the Web -Version: 0.3.3 +Version: 0.3.3.9000 Authors@R: c( person("Victor", "Perrier", email = "victor.perrier@dreamrs.fr", role = c("aut", "cre", "cph")), person("Fanny", "Meyer", role = "aut"), diff --git a/NEWS.md b/NEWS.md index 2e317a1..22423f4 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,9 +1,17 @@ +# toastui 0.3.4 + +* Updated `cal_props()` example. +* Turn off `usageStatistics` option for `datagrid()` and `chart()` (same as for `calendar()`). + + + # toastui 0.3.3 * New function `grid_col_checkbox()` to add checkboxes into a column. * `datagrid()`: new argument `guess_colwidths_opts` to customize colums widths with function `guess_colwidths_options()`. + # toastui 0.3.2 * Updated tui-grid to 4.21.22. diff --git a/R/chart.R b/R/chart.R index def05e1..928042a 100644 --- a/R/chart.R +++ b/R/chart.R @@ -55,6 +55,8 @@ chart <- function(data = list(), if (is.null(options$yAxis$title) & !is.null(mapping$y)) { options$yAxis$title <- as_label(mapping$y) } + if (is.null(options$usageStatistics)) + options$usageStatistics = getOption("toastuiUsageStatistics", default = FALSE) createWidget( name = "chart", x = list( diff --git a/R/datagrid.R b/R/datagrid.R index 30e77ac..a147b68 100644 --- a/R/datagrid.R +++ b/R/datagrid.R @@ -81,7 +81,8 @@ datagrid <- function(data = list(), } ), bodyHeight = "fitToParent", - draggable = draggable + draggable = draggable, + usageStatistics = getOption("toastuiUsageStatistics", default = FALSE) ) options <- modifyList(x = options, val = list(...), keep.null = FALSE)