loncom/xml/lonxml.pm - diff

Return to lonxml.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.463, 2007/10/10 00:02:27	version 1.465, 2007/10/16 23:20:05
Line 631 sub callsub {	Line 631 sub callsub {
return $currentstring;	return $currentstring;
}	}

	{
	my %state;

	sub init_state {
	undef(%state);
	}

	sub set_state {
	my ($key,$value) = @_;
	$state{$key} = $value;
	return $value;
	}
	sub get_state {
	my ($key) = @_;
	return $state{$key};
	}
	}

sub setup_globals {	sub setup_globals {
my ($request,$target)=@_;	my ($request,$target)=@_;
$Apache::lonxml::request=$request;	$Apache::lonxml::request=$request;
Line 640 sub setup_globals {	Line 658 sub setup_globals {
$Apache::lonxml::usestyle=1;	$Apache::lonxml::usestyle=1;
&init_counter();	&init_counter();
&clear_bubble_lines_for_part();	&clear_bubble_lines_for_part();
	&init_state();
@Apache::lonxml::pwd=();	@Apache::lonxml::pwd=();
@Apache::lonxml::extlinks=();	@Apache::lonxml::extlinks=();
@script_var_displays=();	@script_var_displays=();
Line 1495 FULLPAGE	Line 1514 FULLPAGE
} else {	} else {
$initialize.=(<<FULLPAGE);	$initialize.=(<<FULLPAGE);
<script type="text/javascript">	<script type="text/javascript">
$addbuttons
function initDocument() {	function initDocument() {
resize_textarea('$textarea_id','LC_aftertextarea');	resize_textarea('$textarea_id','LC_aftertextarea');
}	}