loncom/xml/style.pm - diff

Return to style.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.15, 2002/11/06 22:48:56	version 1.16, 2003/06/09 21:37:54
Line 107 sub styleparser {	Line 107 sub styleparser {
###########	###########
if ($current_value) {	if ($current_value) {
push(@values,$current_value);	push(@values,$current_value);
&Apache::lonxml::debug("a:$current_value: $#values \n");	#&Apache::lonxml::debug("a:$current_value: $#values \n");
} else {	} else {
pop(@keys);	pop(@keys);
}	}
Line 120 sub styleparser {	Line 120 sub styleparser {
push @style_array,$keys[$i],$values[$i];	push @style_array,$keys[$i],$values[$i];
}	}
my %style_for_target = @style_array;	my %style_for_target = @style_array;
	&Apache::lonhomework::showhash(%style_for_target);
# check printing	# check printing
# foreach $current_key (sort keys %style_for_target) {	# foreach $current_key (sort keys %style_for_target) {
# &Apache::lonxml::debug("$current_key => $style_for_target{$current_key}\n");	# &Apache::lonxml::debug("$current_key => $style_for_target{$current_key}\n");