SummarizedExperiment apparently missing validity check on re-assignment of rownames of rowData

rowdata.R

# this is using SummarizedExperiment v1.11.5
suppressPackageStartupMessages(library(SummarizedExperiment))
m <- matrix(1:20, nrow=5, ncol=4, dimnames=list(letters[1:5], LETTERS[1:4]))

# this gives an error, good.
rowdata <- data.frame(x=1:5, row.names=letters[5:1])
se <- SummarizedExperiment(m, rowData=rowdata)

# build the right way
rowdata <- data.frame(x=1:5, row.names=letters[1:5])
se <- SummarizedExperiment(m, rowData=rowdata)
z <- rowData(se)[5:1,,drop=FALSE]

# so there's an problem:
all(rownames(se) == rownames(z))

# yet this is allowed, bad.
rowData(se) <- z