Fixed font shifting

jacobpstein · Dec 21, 2023 · 80f85fe · 80f85fe
1 parent 0c1c435
commit 80f85fe
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/usaid_plot.R b/R/usaid_plot.R
@@ -18,9 +18,9 @@
 #' }
 
 usaid_plot <- function(data_type = "discrete", ppt = FALSE) {
-  is_mac <- tolower(Sys.info()[['sysname']]) == "darwin"
+  is_windows <- tolower(Sys.info()[['sysname']]) == "windows"
 
-  font_family <- if (is_mac) "Gill Sans" else "Gill Sans MT"
+  font_family <- if (is_windows) "Gill Sans MT" else "Gill Sans"
 
   theme_settings <- ggplot2::theme(
     legend.position = "NA",