add new geom to default aes

CMAP-REPOS · Aug 12, 2024 · e73faf3 · e73faf3
1 parent 6ec7488
commit e73faf3
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 0 deletions.
diff --git a/R/cmapplot_globals.R b/R/cmapplot_globals.R
@@ -114,6 +114,7 @@ cmapplot_globals$geoms_that_change <- c(
   "Line",
   "Text",
   "TextLast",
+  "TextLastNew",
   "PointLast",
   "RecessionsText"
 )

diff --git a/R/default_aes.R b/R/default_aes.R
@@ -29,6 +29,12 @@ init_cmap_default_aes <- function () {
       size = cmapplot_globals$fsize$M/ggplot2::.pt, # pt-to-mm conversion
       colour = cmapplot_globals$colors$blackish
     ),
+    TextLastNew = list(
+      family = cmapplot_globals$font$strong$family,
+      fontface = ifelse(cmapplot_globals$font$strong$face == "bold", 2, 1),
+      size = cmapplot_globals$fsize$M/ggplot2::.pt, # pt-to-mm conversion
+      colour = cmapplot_globals$colors$blackish
+    ),
     PointLast = list(
       size = 2 * gg_lwd_convert(cmapplot_globals$consts$lwd_plotline)
     ),