Downgrade to plotly.js v1.16.3 for stability. Temporarily fixes #717

Author: cpsievert

R/sysdata.rda

@@ -22,7 +22,7 @@ devtools::install_github("ropensci/plotly")
 
 ### Web-based ggplot2 graphics
 
-If you use [ggplot2](http://cran.r-project.org/package=ggplot2), `ggplotly()` converts your plots to an interactive, web-based version! It also provides sensible tooltips, which assists decoding of values encoded as visual properties in the plot.
+If you use [ggplot2](https://github.com/hadley/ggplot2), `ggplotly()` converts your plots to an interactive, web-based version! It also provides sensible tooltips, which assists decoding of values encoded as visual properties in the plot.
 
 ```r
 library(plotly)

README.md

@@ -1,6 +1,6 @@
 library(shiny)
 library(plotly)
-library(ggplot2movies) # movies is no longer contained within ggplot2 https://cran.r-project.org/web/packages/ggplot2movies/index.html
+library(ggplot2movies) # movies is no longer contained within ggplot2
 
 minx <- min(movies$rating)
 maxx <- max(movies$rating)

inst/examples/Movies/server.R

@@ -8,7 +8,7 @@ HTMLWidgets.widget({
     // uncomment this console.log(), then do `load_all(); plot_ly()` 
     // open in chrome, right-click on console output: "save-as" -> "schema.json"
     // Schema <- jsonlite::fromJSON("~/Downloads/schema.json")
-    // devtools::use_data(Schema, overwrite = T)
+    // devtools::use_data(Schema, overwrite = T, internal = T)
     // console.log(JSON.stringify(Plotly.PlotSchema.get()));
     return {};
   },

inst/htmlwidgets/lib/plotlyjs/plotly-latest.min.js

@@ -1,6 +1,6 @@
 dependencies:
   - name: plotlyjs
-    version: 1.17.2
+    version: 1.16.3
     src: "htmlwidgets/lib/plotlyjs"
     script: plotly-latest.min.js
     stylesheet: plotly-htmlwidgets.css

inst/htmlwidgets/plotly.js

@@ -1,15 +1,17 @@
 library(httr)
 x <- GET('https://api.github.com/repos/plotly/plotly.js/releases/latest')
 zip <- content(x)$zipball_url
+# for a particular version:
+# zip <- "https://github.com/plotly/plotly.js/archive/v1.16.3.zip"
 tmp <- tempfile(fileext = ".zip")
 download.file(zip, tmp)
 unzip(tmp)
 # update the plotly.js bundle
-p <- Sys.glob("plotly-plotly.js*/dist/plotly.min.js")
+p <- Sys.glob("*plotly.js*/dist/plotly.min.js")
 file.copy(p, "inst/htmlwidgets/lib/plotlyjs/plotly-latest.min.js", overwrite = T)
-l <- Sys.glob("plotly-plotly.js*/LICENSE")
+l <- Sys.glob("*plotly.js*/LICENSE")
 file.copy(l, "inst/htmlwidgets/lib/plotlyjs/LICENSE", overwrite = T)
-unlink("plotly-plotly.js*", recursive = T)
+unlink("*plotly.js*", recursive = T)
 message("Manually update plotly.yaml with this version")
 basename(zip)