version 1.44, 2006/01/06 21:52:19
|
version 1.46, 2006/01/06 22:50:29
|
Line 564 sub display_discussion_config {
|
Line 564 sub display_discussion_config {
|
if ($current eq '') { |
if ($current eq '') { |
$current = 'on'; |
$current = 'on'; |
} |
} |
my %status = ( |
my %status = ( $current => 'checked="checked"'); |
on => 'checked="checked"', |
|
off => 'checked="checked"', |
$r->print('<br />'.&mt('Choose whether or not to display a count of the number of new posts for each resource or bulletin board which has unread posts.').'<br />'.&mt('This can increase the time taken to gather data for the [_1] page by a few seconds.',"<i>What's New?</i>").' '); |
); |
|
$status{$current} = ''; |
|
$r->print('<br />'.&mt('Choose whether or not to display a count of the number of new posts for each resource or bulletin board which has unread posts.').'<br />'.&mt('This can increase the time taken to gather data for the [_1] page by a few seconds.',"<i>What's New?</i>").' '.&mt('Currently set to [_1] .'),"<b>$current</b>."); |
|
$r->print('<br /><br /> |
$r->print('<br /><br /> |
<form method="post" name="discussionswitch" action="/adm/whatsnew">'. |
<form method="post" name="discussionswitch" action="/adm/whatsnew">'. |
&mt('Display of unread post counts?').' |
&mt('Display of unread post counts?').' |
<input type="hidden" name="command" value="newdiscconf" /> |
<input type="hidden" name="command" value="newdiscconf" /> |
<input type="hidden" name="refpage" value="'.$refpage.'" /> |
<input type="hidden" name="refpage" value="'.$refpage.'" /> |
<input type ="radio" '.$status{'on'}.' name="countunread" value="on">on |
<label><input type ="radio" '.$status{'on'}.' name="countunread" value="on">on</label> |
|
|
<input type ="radio" '.$status{'off'}.' name="countunread" value="off">off |
<label><input type ="radio" '.$status{'off'}.' name="countunread" value="off">off</label> |
'); |
'); |
$r->print('<br/><br /> |
$r->print('<br/><br /> |
<input type="submit" name="display" value="'. |
<input type="submit" name="display" value="'. |
Line 617 $$initpage{$current}</b>.<br /><br />
|
Line 614 $$initpage{$current}</b>.<br /><br />
|
$lt{'padc'} |
$lt{'padc'} |
END |
END |
foreach my $choice (@chgstate) { |
foreach my $choice (@chgstate) { |
$r->print('<nobr><input type="radio" name="courseinit_control" value="'. |
$r->print('<nobr><label><input type="radio" name="courseinit_control" value="'. |
$choice.'"/>'.$$initpage{$choice}.' </nobr>'); |
$choice.'"/>'.$$initpage{$choice}.' </label></nobr>'); |
} |
} |
$r->print('<br /><br />'.&mt('If').' '.$$initpage{'coursespecific'}. |
$r->print('<br /><br />'.&mt('If').' '.$$initpage{'coursespecific'}. |
'<br />'.$lt{'chce'}." \n"); |
'<br />'.$lt{'chce'}." \n"); |
foreach my $choice (@chgentry) { |
foreach my $choice (@chgentry) { |
$r->print('<nobr><input type="radio" name="courseinit_page" value="'. |
$r->print('<nobr><label><input type="radio" name="courseinit_page" value="'. |
$choice.'"/>'.$$initpage{$choice}.' </nobr>'); |
$choice.'"/>'.$$initpage{$choice}.' </label></nobr>'); |
} |
} |
$r->print('<br /><br /><input type="submit" name="display" value="'. |
$r->print('<br /><br /><input type="submit" name="display" value="'. |
$lt{'moce'}.'" /></form>'); |
$lt{'moce'}.'" /></form>'); |