version 1.3.0

stla · stla · commit 847b2080c6cb · 2021-01-11T19:39:42.000+01:00
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: rAmCharts4
 Title: Interface to the JavaScript Library 'amCharts 4' 
-Version: 1.2.0.9000
+Version: 1.3.0
 Authors@R: c(
     person(given = "Stéphane",
            family = "Laurent",
diff --git a/NEWS.md b/NEWS.md
@@ -1,4 +1,4 @@
-# rAmCharts4 1.2.0.9000 (xxx)
+# rAmCharts4 1.3.0 (2021-01-11)
 
 * New options for legends: `maxWidth`, `maxHeight`, and `scrollable`.
 * New chart: pie chart.
diff --git a/R/shiny.R b/R/shiny.R
@@ -348,5 +348,5 @@ updateAmGaugeChart <- function(session, outputId, score){
 #' @export
 updateAmPieChart <- function(session, outputId, data){
   stopifnot(is.data.frame(data))
-  session$sendCustomMessage(paste0(outputId, "pie"), score)
+  session$sendCustomMessage(paste0(outputId, "pie"), data)
 }

Original file line number	Diff line number	Diff line change
`@@ -1,4 +1,4 @@`
`1`		`-# rAmCharts4 1.2.0.9000 (xxx)`
	`1`	`+# rAmCharts4 1.3.0 (2021-01-11)`
`2`	`2`
`3`	`3`	* New options for legends: `maxWidth`, `maxHeight`, and `scrollable`.
`4`	`4`	`* New chart: pie chart.`
Original file line number	Diff line number	Diff line change
`@@ -348,5 +348,5 @@ updateAmGaugeChart <- function(session, outputId, score){`
`348`	`348`	`#' @export`
`349`	`349`	`updateAmPieChart <- function(session, outputId, data){`
`350`	`350`	`stopifnot(is.data.frame(data))`
`351`		`- session$sendCustomMessage(paste0(outputId, "pie"), score)`
	`351`	`+ session$sendCustomMessage(paste0(outputId, "pie"), data)`
`352`	`352`	`}`