version 1.25, 2002/03/26 16:15:34
|
version 1.26, 2002/04/03 18:47:39
|
Line 323 sub adddiscuss {
|
Line 323 sub adddiscuss {
|
|
|
my %contrib=('message' => $email, |
my %contrib=('message' => $email, |
'sendername' => $ENV{'user.name'}, |
'sendername' => $ENV{'user.name'}, |
'senderdomain' => $ENV{'user.domain'}); |
'senderdomain' => $ENV{'user.domain'}, |
|
'screenname' => $ENV{'environment.screenname'}, |
|
'plainname' => $ENV{'environment.firstname'}.' '. |
|
$ENV{'environment.middlename'}.' '. |
|
$ENV{'environment.lastname'}.' '. |
|
$ENV{'enrironment.generation'}); |
if ($anon) { |
if ($anon) { |
$contrib{'anonymous'}='true'; |
$contrib{'anonymous'}='true'; |
} |
} |