expect_equal_meta <- function(.meta, expected) { expect_equal(as.character(.meta), expected) }