--- loncom/interface/lonsupportreq.pm 2017/01/23 19:49:07 1.89 +++ loncom/interface/lonsupportreq.pm 2017/01/23 19:51:52 1.90 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Helpdesk request form # -# $Id: lonsupportreq.pm,v 1.89 2017/01/23 19:49:07 raeburn Exp $ +# $Id: lonsupportreq.pm,v 1.90 2017/01/23 19:51:52 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1018,20 +1018,19 @@ END } } - my $attachment_text; + my $attachment_text = ''; unless ($homeserver && $attachmentpath) { - my $envdata = ''; foreach my $var (@cookievars) { - $envdata .= "$var: $cookies{$var}\n"; + $attachment_text .= "$var: $cookies{$var}\n"; } foreach my $var (@ENVvars) { - $envdata .= "$var: $ENV{$var}\n"; + $attachment_text .= "$var: $ENV{$var}\n"; } foreach my $var (@envvars) { - $envdata .= "$var: $env{$var}\n"; + $attachment_text .= "$var: $env{$var}\n"; } foreach my $var (@loncvars) { - $envdata .= "$var: $env{$var}\n"; + $attachment_text .= "$var: $env{$var}\n"; } $attachment_text = $envdata; }