loncom/interface/lonsupportreq.pm - diff

Return to lonsupportreq.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.99, 2019/08/12 18:02:25	version 1.100, 2020/06/09 21:32:32
Line 1117 END	Line 1117 END
}	}

# Compose and send a MIME email	# Compose and send a MIME email
&Apache::loncommon::mime_email($from, $to, $subject, $supportmsg, $cc_string, $bcc,	&Apache::loncommon::mime_email($from,'',$to,$subject,$supportmsg,$cc_string,
$attachmentpath, $fname, $attachment_text);	$bcc,$attachmentpath,$fname,$attachment_text);

if ($attachmentpath =~ m\|$Apache::lonnet::perlvar{'lonDaemons'}/tmp/helprequests/(\d+)/[^/]+\|) {	if ($attachmentpath =~ m\|$Apache::lonnet::perlvar{'lonDaemons'}/tmp/helprequests/(\d+)/[^/]+\|) {
unlink($attachmentpath);	unlink($attachmentpath);