fix scoping

cpsievert · cpsievert · commit de622a0f58dd · 2019-04-03T15:57:02.000-05:00
diff --git a/R/plotly_build.R b/R/plotly_build.R
@@ -1030,7 +1030,7 @@ coerce_attr_defaults <- function(trace, layout) {
     # As of v1.46.1, paper_bgcolor defaults to '#fff' which
     # col2rgb() can't parse, but expands to '#ffffff'
     # https://stackoverflow.com/a/2899224/1583084
-    bgcolor <- p$x$layout$paper_bgcolor %||% "#ffffff"
+    bgcolor <- layout$paper_bgcolor %||% "#ffffff"
     trace$stroke <- trace[["stroke"]] %||% default(I(bgcolor))
   }
   trace

Original file line number	Diff line number	Diff line change
`@@ -1030,7 +1030,7 @@ coerce_attr_defaults <- function(trace, layout) {`
`1030`	`1030`	`# As of v1.46.1, paper_bgcolor defaults to '#fff' which`
`1031`	`1031`	`# col2rgb() can't parse, but expands to '#ffffff'`
`1032`	`1032`	`# https://stackoverflow.com/a/2899224/1583084`
`1033`		`- bgcolor <- p$x$layout$paper_bgcolor %\|\|% "#ffffff"`
	`1033`	`+ bgcolor <- layout$paper_bgcolor %\|\|% "#ffffff"`
`1034`	`1034`	`trace$stroke <- trace[["stroke"]] %\|\|% default(I(bgcolor))`
`1035`	`1035`	`}`
`1036`	`1036`	`trace`