loncom/interface/lonsupportreq.pm - diff

Return to lonsupportreq.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.41, 2006/12/21 18:32:54	version 1.42, 2006/12/22 20:51:27
Line 27	Line 27
package Apache::lonsupportreq;	package Apache::lonsupportreq;

use strict;	use strict;
use lib qw(/home/httpd/lib/perl);
use MIME::Types;	use MIME::Types;
use MIME::Lite;	use MIME::Lite;
use CGI::Cookie();	use CGI::Cookie();
Line 48 sub handler {	Line 47 sub handler {
if ($r->header_only) {	if ($r->header_only) {
return OK;	return OK;
}	}
	if ($r->uri eq '/adm/helpdesk') {
	&Apache::lonlocal::get_language_handle($r);
	}

&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['origurl','function']);	&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['origurl','function']);
if ($r->uri eq '/adm/helpdesk') {	if ($r->uri eq '/adm/helpdesk') {
&Apache::lonacc::get_posted_cgi($r);	&Apache::lonacc::get_posted_cgi($r);