disable usageStatistics

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 = "[email protected]", role = c("aut", "cre", "cph")),
   person("Fanny", "Meyer", role = "aut"),

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.

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(

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)