Failure with dev dtplyr

[hadley]

library(rFIA)

data(fiaRI)
fiaRI_mr <- clipFIA(fiaRI)

area(db = fiaRI_mr)
#> Error in `dplyr::select()`:
#> ! Can't subset columns that don't exist.
#> ✖ Column `fad_mean` doesn't exist.

^{Created on 2023-02-14 with reprex v2.0.2}

This seems to be because aEst has column fad_mean_mean instead of fad_mean but I can't figure out where that's calculated to tell if it's a dtplyr bug or a rFIA bug.