Update the abbreviation for a glossary entry
update_abbrev(x, ...)
x <- as_glossary(list(ka = "absorption rate constant"))
x <- update_abbrev(x, ka = "\\ensuremath{k_a}")
x$ka
#> absorption rate constant (\ensuremath{k_a})
x <- update_abbrev(x, ka)
x$ka
#> absorption rate constant (ka)