Lines Matching refs:comment

819 	my $comment = "";
824 		$comment = $3 if defined $3;
827 		$comment = $2 if defined $2;
830 		$comment = $2 if defined $2;
844 			$comment = "";
858 	return ($name, $address, $comment);
2268 			my ($email_name, $email_address, $comment) = parse_email($email);
2279 				if ("$dequoted$comment" ne $email &&
2280 				    "<$email_address>$comment" ne $email &&
2281 				    "$suggested_email$comment" ne $email) {
2283 					     "email address '$email' might be better as '$suggested_email$comment'\n" . $herecurr);
3284 					my $comment = trim($1);
3285 					$fixed[$fixlinenr] =~ s@\/\/(.*)$@/\* $comment \*/@;