loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.9, 2000/09/14 20:55:42	version 1.11, 2000/09/19 19:10:01
Line 22 sub handler {	Line 22 sub handler {
my $result = '';	my $result = '';
&Apache::inputtags::initialize_inputtags;	&Apache::inputtags::initialize_inputtags;
$result = Apache::lonxml::xmlparse($target, &getfile($file),	$result = Apache::lonxml::xmlparse($target, &getfile($file),
&getfile('/home/httpd/html/res/103/albertel/default_homework').&setup_vars($target),%mystyle);	&getfile('/home/httpd/html/res/adm/includes/default_homework').&setup_vars($target),%mystyle);
#$request->print("Result follows:");	#$request->print("Result follows:");
$request->print($result);	$request->print($result);
#$request->print(":Result ends");	#$request->print(":Result ends");
Line 35 sub get_target {	Line 35 sub get_target {

sub setup_vars {	sub setup_vars {
my ($target) = @_;	my ($target) = @_;
return ';$external::target='.$target.';';	return ';'
	# return ';$external::target='.$target.';';
}	}

sub send_header {	sub send_header {