fix silly mistake from 3cbccfc

cpsievert · cpsievert · commit 7b32e7ed7be5 · 2019-11-06T18:03:29.000-06:00
diff --git a/R/ggplotly.R b/R/ggplotly.R
@@ -1157,7 +1157,7 @@ verifyUnit <- function(u) {
 # Use public API for getting the unit's type, if available
 # https://github.com/ropensci/plotly/pull/1646#issue-331268260
 getUnitType <- function(u) {
-  tryNULL(get("unitType", envir = asNamespace("grid"))) %||%
+  tryNULL(get("unitType", envir = asNamespace("grid"))(u)) %||%
     attr(u, "unit")
 }
 

Original file line number	Diff line number	Diff line change
`@@ -1157,7 +1157,7 @@ verifyUnit <- function(u) {`
`1157`	`1157`	`# Use public API for getting the unit's type, if available`
`1158`	`1158`	`# https://github.com/ropensci/plotly/pull/1646#issue-331268260`
`1159`	`1159`	`getUnitType <- function(u) {`
`1160`		`- tryNULL(get("unitType", envir = asNamespace("grid"))) %\|\|%`
	`1160`	`+ tryNULL(get("unitType", envir = asNamespace("grid"))(u)) %\|\|%`
`1161`	`1161`	`attr(u, "unit")`
`1162`	`1162`	`}`
`1163`	`1163`