loncom/interface/lontemplate.pm - diff

Return to lontemplate.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.29, 2009/03/27 15:46:38	version 1.30, 2009/04/14 15:32:12
Line 121 sub print_template	Line 121 sub print_template
my ($r,$topic,$content, $allowed,$boxclass) = @_;	my ($r,$topic,$content, $allowed,$boxclass) = @_;
$r->print('<div class="'.$boxclass.'">');	$r->print('<div class="'.$boxclass.'">');
$r->print('<h4 class="LC_hcell">'.$topic.'</h4>');	$r->print('<h4 class="LC_hcell">'.$topic.'</h4>');
$r->print('<p>' .$content . '</p>');	$r->print('<div class="LC_BoxPadding">' .$content . '</div>');
$r->print('</div>');	$r->print('</div>');
}	}
sub print_start_template	sub print_start_template
Line 129 sub print_start_template	Line 129 sub print_start_template
my ($r,$topic,$boxclass) = @_;	my ($r,$topic,$boxclass) = @_;
$r->print('<div class="'.$boxclass.'">');	$r->print('<div class="'.$boxclass.'">');
$r->print('<h4 class="LC_hcell">'.$topic.'</h4>');	$r->print('<h4 class="LC_hcell">'.$topic.'</h4>');
	$r->print('<div class="LC_BoxPadding">' );
}	}
sub print_end_template	sub print_end_template
{	{
my ($r) = @_;	my ($r) = @_;
$r->print('</div>');	$r->print('</div>');
	$r->print('</div>');
}	}
sub print_editbox_template	sub print_editbox_template
{	{