A Naive Bayes text classifier