`override.aes` is ignored with `aesthetics = c("fill", "color")` when using `{ggnewscale}` about ggnewscale HOT 2 CLOSED

library(ggplot2)

p2 <- ggplot(mtcars, aes(factor(gear), mpg, color = factor(gear))) + 
  geom_boxplot() + 
  scale_color_brewer(type = "qual", 
                     aesthetics = c("fill", "color"),
                     guide = guide_legend(
                       override.aes = list(
                         fill = c("red", "blue", "blue")
                       )))
p2

p2 + 
  ggnewscale::new_scale_color() + 
  ggnewscale::new_scale_fill()