--- loncom/interface/lonparmset.pm 2009/01/27 15:59:30 1.425 +++ loncom/interface/lonparmset.pm 2009/02/03 21:11:16 1.428 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set parameters for assessments # -# $Id: lonparmset.pm,v 1.425 2009/01/27 15:59:30 schafran Exp $ +# $Id: lonparmset.pm,v 1.428 2009/02/03 21:11:16 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -974,12 +974,13 @@ sub print_row { .$$part{$which}.''); } else { $parm=~s|\[.*\]\s||g; + $parm=&mt($parm); } my $automatic=&rulescache(($which=~/\_([^\_]+)$/)[0].'_triggers'); if ($automatic) { $parm.='
'.&mt('Automatically sets').' '.join(', ',split(/\:/,$automatic)).'
'; } - $r->print(''.$parm.''); + $r->print(''.$parm.''); my $thismarker=$which; $thismarker=~s/^parameter\_//; @@ -1315,9 +1316,14 @@ ENDSCRIPT if ($$pscat[0] eq "all" || grep $_ eq $tempkey, @{$pscat}) { $r->print(' checked="checked"'); } - $r->print(' />'.($$allparms{$tempkey}=~/\S/ ? &mt($$allparms{$tempkey}) - : &mt($tempkey)) - .''); + my $displaykey; + if ($$allparms{$tempkey}=~/\S/) { + $displaykey = $$allparms{$tempkey}; + } else { + $displaykey = $tempkey; + } + $displaykey =~ s/(\[|\])/~$1/g; + $r->print(' />'.&mt($displaykey).''); $cnt++; if ($cnt==3) { $r->print("\n");