runTomTom doesn't throw duplicate motif message when using universalmotif input database

[snystrom]

Example:

m <- create_motif()
db <- c(m, m)

runTomTom(dreme_out, database = db)
# No message about removing identical motifs...