Lines Matching refs:comment

775 	my $comment = "";
780 		$comment = $3 if defined $3;
783 		$comment = $2 if defined $2;
786 		$comment = $2 if defined $2;
800 			$comment = "";
814 	return ($name, $address, $comment);
2187 			my ($email_name, $email_address, $comment) = parse_email($email);
2198 				if ("$dequoted$comment" ne $email &&
2199 				    "<$email_address>$comment" ne $email &&
2200 				    "$suggested_email$comment" ne $email) {
2202 					     "email address '$email' might be better as '$suggested_email$comment'\n" . $herecurr);
3117 					my $comment = trim($1);
3118 					$fixed[$fixlinenr] =~ s@\/\/(.*)$@/\* $comment \*/@;