version 1.89, 2017/01/23 19:49:07
|
version 1.90, 2017/01/23 19:51:52
|
Line 1018 END
|
Line 1018 END
|
} |
} |
} |
} |
|
|
my $attachment_text; |
my $attachment_text = ''; |
unless ($homeserver && $attachmentpath) { |
unless ($homeserver && $attachmentpath) { |
my $envdata = ''; |
|
foreach my $var (@cookievars) { |
foreach my $var (@cookievars) { |
$envdata .= "$var: $cookies{$var}\n"; |
$attachment_text .= "$var: $cookies{$var}\n"; |
} |
} |
foreach my $var (@ENVvars) { |
foreach my $var (@ENVvars) { |
$envdata .= "$var: $ENV{$var}\n"; |
$attachment_text .= "$var: $ENV{$var}\n"; |
} |
} |
foreach my $var (@envvars) { |
foreach my $var (@envvars) { |
$envdata .= "$var: $env{$var}\n"; |
$attachment_text .= "$var: $env{$var}\n"; |
} |
} |
foreach my $var (@loncvars) { |
foreach my $var (@loncvars) { |
$envdata .= "$var: $env{$var}\n"; |
$attachment_text .= "$var: $env{$var}\n"; |
} |
} |
$attachment_text = $envdata; |
$attachment_text = $envdata; |
} |
} |