Font family supplied via theme(text = ...) is not honored in plot headings

[nbenn]

When supplying a custom font via theme(text = element_text(family = ...)), this is picked up in some places, i.e.

forestmodel/R/recalculate_width_panels.R

Line 13 in 09cb5b2

family <- if (is.na(theme$text$family) || theme$text$family == "") "sans" else theme$text$family

but in other places, this is ignored, i.e.

forestmodel/R/panel_forest_plot.R

Lines 414 to 418 in 09cb5b2

	geom_text(aes(x, y, label = label, hjust = hjust, fontface = fontface),
	filter(forest_text, parse == parse_type),
	na.rm = TRUE, parse = parse_type,
	size = format_options$text_size
	)

My issue goes away, when I patch through family = theme$text$family to the aes() call in line 414.