glht objects are not relabeled

[raffaelemancuso]

Bug reported upstream following vincentarelbundock/modelsummary#897

library(magrittr)
library(glmmTMB)
mydf <- mtcars
mydf %<>% labelled::set_variable_labels(
  mpg = "Miles per gallon",
  cyl = "Number of cylinders",
  gear = "Number of forward gears"
)
fit <- glmmTMB(mpg ~ cyl * gear,
  data = mydf,
  family = gaussian(link = "identity"))
res <- multcomp::glht(fit, linfct = "cyl + gear = 0")
p <- parameters::parameters(res, pretty_names = "labels")
attr(p, "pretty_labels")
#>   cyl + gear == 0 
#> "cyl + gear == 0"

cyl and gear should have been relabelled