don't append the "(none)" domainname as email address

CVSROOT

diff -u -r1.1 -r1.2
--- log_accum.pl	15 Feb 2004 20:45:59 -0000	1.1
+++ log_accum.pl	13 Apr 2004 12:29:40 -0000	1.2
@@ -254,10 +254,12 @@

 $login = getlogin || (getpwuid($<))[0] || "nobody";
 chop($hostname = `hostname`);
 chop($domainname = `domainname`);

-if ($domainname !~ '^\..*') {

+if (($domainname !~ '^\..*') && ($domainname ne "(none)")) {

     $domainname = '.' . $domainname;
 }

-$hostdomain = $hostname . $domainname;

+if ($domainname ne "(none)") {
+  $hostdomain = $hostname . $domainname;
+}

 $cvsroot = $ENV{'CVSROOT'};
 $do_status = 1;			# moderately useful
 $show_wd = 0;			# useless in client/server