exporting function does not work anymore

Hi the exporting option does not work anymore, by clicking on export (as png, pdf, jpeg, etc) you are redirected to highcharts.com link

example:
library(rCharts)
a <- hPlot(Pulse ~ Height, data = MASS::survey, type = "scatter", group = "Exer")
a$exporting(enabled = TRUE)
