add key to GeomPoint

Author: cpsievert

R/layers2traces.R

@@ -385,6 +385,7 @@ geom2trace.GeomPoint <- function(data, params) {
     x = data$x,
     y = data$y,
     text = data$text,
+    key = data$key,
     type = "scatter",
     mode = "markers",
     marker = list(

R/subplots.R

@@ -21,7 +21,6 @@
 #' }
 
 
-## TODO: throw warning if geo and non-geo coordinates are used!!!
 subplot <- function(..., nrows = 1, which_layout = "merge", margin = 0.02) {
   # note that dots is a _list of plotlys_
   dots <- lapply(list(...), plotly_build)