loncom/interface/lonpickcourse.pm - diff

Return to lonpickcourse.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.39, 2006/02/02 17:57:40	version 1.40, 2006/03/15 22:11:04
Line 42 sub handler {	Line 42 sub handler {
return OK if $r->header_only;	return OK if $r->header_only;

# ------------------------------------------------------------ Print the screen	# ------------------------------------------------------------ Print the screen
my $html=&Apache::lonxml::xmlbegin();	$r->print(&Apache::lonxml::xmlbegin().
$r->print(<<ENDDOCUMENT);	&Apache::loncommon::head());
$html
<head>
<title>The LearningOnline Network with CAPA</title>
</head>
ENDDOCUMENT
# Get parameters from query string	# Get parameters from query string
&Apache::loncommon::get_unprocessed_cgi	&Apache::loncommon::get_unprocessed_cgi
($ENV{'QUERY_STRING'},['domainfilter','descriptfilter',	($ENV{'QUERY_STRING'},['domainfilter','descriptfilter',
Line 336 ENDSCRIPT	Line 332 ENDSCRIPT
}	}
$r->print("</form>\n");	$r->print("</form>\n");
}	}
$r->print('</body></html>');	$r->print(&Apache::loncommon::end_page());
return OK;	return OK;
}	}