@ -75,7 +75,7 @@ as.disk <- function(x, na.rm = FALSE) {
if (!is.disk(x)) {
x <- unlist(x)
if (na.rm == TRUE) {
if (isTRUE(na.rm)) {
x <- x[!is.na(x)]
}
x[trimws2(x) == ""] <- NA
The note is not visible to the blocked user.