plotly
diff --git a/‎DESCRIPTION
Copy file name to clipboardExpand all lines: DESCRIPTION
+1-5Lines changed: 1 addition & 5 deletions b/‎DESCRIPTION
Copy file name to clipboardExpand all lines: DESCRIPTION
+1-5Lines changed: 1 addition & 5 deletions
diff --git a/‎NEWS.md
Copy file name to clipboardExpand all lines: NEWS.md
+1-1Lines changed: 1 addition & 1 deletion b/‎NEWS.md
Copy file name to clipboardExpand all lines: NEWS.md
+1-1Lines changed: 1 addition & 1 deletion
diff --git a/‎R/ggplotly.R
Copy file name to clipboardExpand all lines: R/ggplotly.R
+3-3Lines changed: 3 additions & 3 deletions b/‎R/ggplotly.R
Copy file name to clipboardExpand all lines: R/ggplotly.R
+3-3Lines changed: 3 additions & 3 deletions
@@ -1,6 +1,6 @@
 Package: plotly
 Title: Create Interactive Web Graphics via 'plotly.js'
-Version: 4.9.2.9000
+Version: 4.9.3
 Authors@R: c(person("Carson", "Sievert", role = c("aut", "cre"),
     email = "cpsievert1@gmail.com", comment = c(ORCID = "0000-0002-4958-2844")),
     person("Chris", "Parmer", role = "aut",
@@ -74,12 +74,8 @@ Suggests:
     processx,
     plotlyGeoAssets,
     forcats,
-    thematic,
     palmerpenguins
 LazyData: true
 RoxygenNote: 7.1.1
 Encoding: UTF-8
 Roxygen: list(markdown = TRUE)
-Remotes: 
-  rstudio/thematic,
-  ramnathv/htmlwidgets
@@ -1,4 +1,4 @@
-# 4.9.2.9000
+# 4.9.3
 
 ## Changes to plotly.js
 
 
@@ -431,8 +431,8 @@ gg2list <- function(p, width = NULL, height = NULL,
 
   # Allow thematic to add new defaults to the plot object based on it's theme
   built <- if (isNamespaceLoaded("thematic")) {
-    ggthematic_build <- getFromNamespace("ggthematic_build", "thematic")
-    ggthematic_build(p, ggplotly_build, thematic::thematic_get_theme(resolve = TRUE))
+    tns <- asNamespace("thematic")
+    tns$ggthematic_build(p, ggplotly_build, tns$thematic_get_theme(resolve = TRUE))
   } else {
     ggplotly_build(p)
   }
@@ -1277,7 +1277,7 @@ font_family <- function(family = "") {
   if (!isNamespaceLoaded("thematic")) {
     return("")
   }
-  font <- thematic::thematic_get_option("font")
+  font <- asNamespace("thematic")$thematic_get_option("font", resolve = TRUE)
   if (!length(font)) {
     return("")
   }
Original file line number	Diff line number	Diff line change
`@@ -1,4 +1,4 @@`
`1`		`-# 4.9.2.9000`
	`1`	`+# 4.9.3`
`2`	`2`
`3`	`3`	`## Changes to plotly.js`
`4`	`4`