Home | History | Annotate | Download | only in misc

Lines Matching refs:Domain

187 # User domain for gecos email addresses
188 my $Domain;
2098 if ( ! defined $Domain ) {
2100 chomp($Domain = slurp_file(MAILNAME));
2108 $Domain = $text;
2116 die "No mail domain found\n"
2117 unless defined $Domain;
2129 my $mailname = $Domain eq '' ? $username : "$username\@$Domain";
2288 } elsif ( defined $Domain or $Gecos == 1 ) {
2290 $email = $author."@".$Domain
2291 if defined $Domain && $Domain ne '';
2565 'domain=s' => \$Domain,
2670 warn "--mailname is deprecated; please use --domain instead\n";
2671 $Domain = $narg;
2933 Use system passwd file for user name expansion. If no mail domain is provided
2934 (via B<--domain>), it tries to read one from B</etc/mailname>, output of B<hostname
2935 -d>, B<dnsdomainname>, or B<domain-name>. cvs2cl exits with an error if none of
2936 those options is successful. Use a domain of '' to prevent the addition of a
2937 mail domain.
2939 =item B<--domain> I<DOMAIN>
2941 Domain to build email addresses from.