[BACK]Return to lonwhatsnew.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonwhatsnew.pm between versions 1.44 and 1.45

version 1.44, 2006/01/06 21:52:19 version 1.45, 2006/01/06 22:37:27
Line 575  sub display_discussion_config { Line 575  sub display_discussion_config {
 &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>
 &nbsp;&nbsp;&nbsp;  &nbsp;&nbsp;&nbsp;
 <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 617  $$initpage{$current}</b>.<br /><br />
 $lt{'padc'}&nbsp;&nbsp;  $lt{'padc'}&nbsp;&nbsp;
 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}.'&nbsp;&nbsp;</nobr>');                     $choice.'"/>'.$$initpage{$choice}.'&nbsp;&nbsp;</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}.'&nbsp;&nbsp;</nobr>');                    $choice.'"/>'.$$initpage{$choice}.'&nbsp;&nbsp;</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>');
Removed from v.1.44  
changed lines
  Added in v.1.45

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>