opacity should respect alpha

cpsievert · cpsievert · commit a9aa06e7b653 · 2016-04-01T12:00:58.000+11:00
diff --git a/R/layers2traces.R b/R/layers2traces.R
@@ -655,7 +655,7 @@ make_error <- function(data, params, xy = "x") {
     text = data$hovertext,
     type = "scatter",
     mode = "lines",
-    opacity = 1,
+    opacity = aes2plotly(data, params, "alpha"),
     line = list(color = "transparent")
   )
   e[[paste0("error_", xy)]] <- list(

Original file line number	Diff line number	Diff line change
`@@ -655,7 +655,7 @@ make_error <- function(data, params, xy = "x") {`
`655`	`655`	`text = data$hovertext,`
`656`	`656`	`type = "scatter",`
`657`	`657`	`mode = "lines",`
`658`		`- opacity = 1,`
	`658`	`+ opacity = aes2plotly(data, params, "alpha"),`
`659`	`659`	`line = list(color = "transparent")`
`660`	`660`	`)`
`661`	`661`	`e[[paste0("error_", xy)]] <- list(`