loncom/interface/lonsupportreq.pm - diff

Return to lonsupportreq.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.11, 2004/11/27 17:23:09	version 1.12, 2004/12/18 22:21:52
Line 17 sub handler {	Line 17 sub handler {
if ($r->header_only) {	if ($r->header_only) {
return OK;	return OK;
}	}
	&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['origurl','function']);
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['action','origurl','function']);	if ($r->uri eq '/adm/helpdesk') {
my $action = $ENV{'form.action'};	&Apache::loncommon::get_posted_cgi($r);
	}
my $function = $ENV{'form.function'};	my $function = $ENV{'form.function'};
my $origurl = &Apache::lonnet::unescape($ENV{'form.origurl'});	my $origurl = &Apache::lonnet::unescape($ENV{'form.origurl'});
	my $action = $ENV{'form.action'};

if ($action eq 'process') {	if ($action eq 'process') {
&print_request_receipt($r,$origurl,$function);	&print_request_receipt($r,$origurl,$function);
} else {	} else {