loncom/interface/lonmsgdisplay.pm - diff

Return to lonmsgdisplay.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.117, 2009/03/04 17:07:31	version 1.118, 2009/03/18 13:46:14
Line 2150 END	Line 2150 END
foreach my $block (@{$typeorder}) {	foreach my $block (@{$typeorder}) {
my $blockstatus = '';	my $blockstatus = '';
if ($blocks->{$block} eq 'on') {	if ($blocks->{$block} eq 'on') {
$blockstatus = 'checked="true"';	$blockstatus = 'checked="checked"';
}	}
$r->print('<label><input type="checkbox" name="'.$block.'_'.$parmcount.'" '.$blockstatus.' value="1" />'.$types->{$block}.'</label><br />');	$r->print('<label><input type="checkbox" name="'.$block.'_'.$parmcount.'" '.$blockstatus.' value="1" />'.$types->{$block}.'</label><br />');
}	}