loncom/interface/lonsupportreq.pm - diff

Return to lonsupportreq.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.71, 2013/01/04 17:46:00	version 1.72, 2013/01/04 18:35:12
Line 641 sub print_request_receipt {	Line 641 sub print_request_receipt {
adin => 'Additional information recorded',	adin => 'Additional information recorded',
);	);

my (@ok_ccs,@bad_ccs,$badccmsg,$okcclist,$public,$homeserver);	my (@ok_ccs,@bad_ccs,$badccmsg,$okcclist,$homeserver);
if (($env{'user.name'} eq 'public') && ($env{'user.domain'} eq 'public')) {	unless ($public) {
$public = 1;
} else {
if (($env{'user.name'} ne '') && ($env{'user.domain'} ne '')) {	if (($env{'user.name'} ne '') && ($env{'user.domain'} ne '')) {
$homeserver = &Apache::lonnet::homeserver($env{'user.name'},	$homeserver = &Apache::lonnet::homeserver($env{'user.name'},
$env{'user.domain'});	$env{'user.domain'});
Line 816 END	Line 814 END

my $attachmentpath = '';	my $attachmentpath = '';
my $attachmentsize = '';	my $attachmentsize = '';
if ((defined($env{'user.name'})) && ($env{'user.name'} ne 'public')	if ((defined($env{'user.name'})) && (!$public)) {
&& ($env{'user.domain'} ne 'public')) {
if ($homeserver && $env{'form.screenshot.filename'}) {	if ($homeserver && $env{'form.screenshot.filename'}) {
$attachmentsize = length($env{'form.screenshot'});	$attachmentsize = length($env{'form.screenshot'});
if ($attachmentsize > 131072) {	if ($attachmentsize > 131072) {