Lines Matching refs:severity
148 if (! $entries{$cur_entry}{severity}) {
154 $entries{$cur_entry}{severity} = $1;
185 if (! exists $entries{$cur_entry}{severity}
420 my $severity = !$routine ? '[PFX]'
470 check_message(standardize($name),$codefn,$severity,$categories);
475 my($name,$codefn,$severity,$categories,$partial) = @_;
522 my $qr = $qrs{$severity} ||= qr/$severity/;
531 ($severity =~ /\[/
532 ? "severity is one of $severity"
533 : "severity is $severity") . "for '$name' at $codefn line $.$pod_line");
545 check_message($_,$codefn,$severity,$categories,1) or $ok = 0, last