loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.326, 2005/12/01 18:46:31	version 1.327, 2005/12/15 23:20:55
Line 113 sub page_start {	Line 113 sub page_start {
&Apache::lonhtmlcommon::htmlareaheaders().	&Apache::lonhtmlcommon::htmlareaheaders().
&Apache::lonhtmlcommon::spellheader().	&Apache::lonhtmlcommon::spellheader().
&Apache::lonxml::fontsettings();	&Apache::lonxml::fontsettings();
	if ($target eq 'edit') {
	$head_tag_start.=&Apache::edit::js_change_detection();
	}
}	}
my $body_tag_start;	my $body_tag_start;
if (!defined($found{'body'}) && $env{'request.state'} eq 'construct') {	if (!defined($found{'body'}) && $env{'request.state'} eq 'construct') {
Line 150 sub page_start {	Line 153 sub page_start {
$form_tag_start='<form name="lonhomework" enctype="multipart/form-data" method="POST" action="';	$form_tag_start='<form name="lonhomework" enctype="multipart/form-data" method="POST" action="';
my $uri=$env{'request.uri'};	my $uri=$env{'request.uri'};
if ($env{'request.enc'}) { $uri=&Apache::lonenc::encrypted($uri); }	if ($env{'request.enc'}) { $uri=&Apache::lonenc::encrypted($uri); }
$form_tag_start.=$uri.'">';	$form_tag_start.=$uri.'" ';
	if ($target eq 'edit') {
	$form_tag_start.=&Apache::edit::form_change_detection();
	}
	$form_tag_start.='>';
}	}
return ($result,$head_tag_start,$body_tag_start,$form_tag_start);	return ($result,$head_tag_start,$body_tag_start,$form_tag_start);
}	}