- Add2Blacklist($sender, $userid, $comment);
- print br "The email address, $sender, has been added to ${Userid}'s $type list";
+ my ($messages, $msg) = Add2Blacklist(%rec);
+
+ if ($messages < -1) {
+ print br {-class => 'error'}, "Unable to add $rec{sender} to $rec{type} list";
+ return;
+ } else {
+ print br "The email address, $rec{sender}, has been added to ${Userid}'s $rec{type} list";
+ } # if