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

Diff for /loncom/interface/lonmsgdisplay.pm between versions 1.124.4.5 and 1.124.4.6

version 1.124.4.5, 2010/01/25 19:30:59 version 1.124.4.6, 2010/01/25 20:56:40
Line 532  sub discourse { Line 532  sub discourse {
             $bcc_curr_hdr = &mt('Bcc: course members with current access');              $bcc_curr_hdr = &mt('Bcc: course members with current access');
         }          }
         $result .= '<fieldset id="LC_activeusers"><legend>'          $result .= '<fieldset id="LC_activeusers"><legend>'
                    .'<b>'.$bcc_curr_hdr.'</b>'.                     .'<b>'.$bcc_curr_hdr.'</b>'
                    .'</legend>'                     .'</legend>'
                    .'<form name="activeusers">';                     .'<form name="activeusers">';
         $result .= $tmptext.'</form></fieldset><br />';          $result .= $tmptext.'</form></fieldset><br />';
Line 553  sub discourse { Line 553  sub discourse {
             $bcc_prev_hdr = &mt('Bcc: course members with expired access');              $bcc_prev_hdr = &mt('Bcc: course members with expired access');
         }          }
         $result .= '<fieldset id="LC_previoususers"><legend>'          $result .= '<fieldset id="LC_previoususers"><legend>'
                    .'<b>'.$bcc_prev_hdr.'</b>'.                     .'<b>'.$bcc_prev_hdr.'</b>'
                    .'</legend>'                     .'</legend>'
                    .'<form name="previoususers">';                     .'<form name="previoususers">';
        $result .= $tmptext.'</form></fieldset><br />';         $result .= $tmptext.'</form></fieldset><br />';
Line 574  sub discourse { Line 574  sub discourse {
             $bcc_future_hdr = &mt('Bcc: course members with future access');              $bcc_future_hdr = &mt('Bcc: course members with future access');
         }          }
         $result .= '<fieldset id="LC_futureusers"><legend>'          $result .= '<fieldset id="LC_futureusers"><legend>'
                    .'<b>'.$bcc_future_hdr.'</b>'.                     .'<b>'.$bcc_future_hdr.'</b>'
                    .'</legend>'                     .'</legend>'
                    .'<form name="futureusers">';                     .'<form name="futureusers">';
        $result .= $tmptext.'</form></fieldset>';         $result .= $tmptext.'</form></fieldset>';
Line 2195  sub display_blocker_status { Line 2195  sub display_blocker_status {
     <th>$ltext->{'setb'}</th>      <th>$ltext->{'setb'}</th>
     <th>$ltext->{'even'}</th>      <th>$ltext->{'even'}</th>
     <th>$ltext->{'blck'}</th>      <th>$ltext->{'blck'}</th>
     <th>$ltext->{'actn'}?</th>      <th>$ltext->{'actn'}</th>
   </tr>    </tr>
 END  END
     foreach my $record (sort(keys(%{$records}))) {      foreach my $record (sort(keys(%{$records}))) {
Line 2225  END Line 2225  END
             if ($blocks->{$block} eq 'on') {              if ($blocks->{$block} eq 'on') {
                 $blockstatus = 'checked="checked"';                  $blockstatus = 'checked="checked"';
             }              }
             $r->print('<label><input type="checkbox" name="'.$block.'_'.$parmcount.'" '.$blockstatus.' value="1" />'.$types->{$block}.'</label><br />');              $r->print('<span class="LC_nobreak"><label><input type="checkbox" name="'.$block.'_'.$parmcount.'" '.$blockstatus.' value="1" />'.$types->{$block}.'</label></span><br />');
         }          }
         $r->print(<<"END");          $r->print(<<"END");
         </td>                </td>
         <td><label>$lt{'modi'}?&nbsp;<input type="checkbox" name="modify_$parmcount" /></label><br /><label>$lt{'canc'}?&nbsp;&nbsp;<input type="checkbox" name="cancel_$parmcount" /></label>          <td><span class="LC_nobreak"><label>
           <input type="checkbox" name="modify_$parmcount" />$lt{'modi'}
           </label></span><br /><span class="LC_nobreak">
           <label>
           <input type="checkbox" name="cancel_$parmcount" />$lt{'canc'}
           </label></span>
 END  END
         $r->print(&Apache::loncommon::end_data_table_row());          $r->print(&Apache::loncommon::end_data_table_row());
         $parmcount++;          $parmcount++;
Line 2266  END Line 2271  END
      <th>$ltext->{'dura'}</th>       <th>$ltext->{'dura'}</th>
      <th>$ltext->{'even'} $lt{'exam'}</th>       <th>$ltext->{'even'} $lt{'exam'}</th>
      <th>$ltext->{'blck'}</th>       <th>$ltext->{'blck'}</th>
      <th>$ltext->{'actn'}?</th>       <th>$ltext->{'actn'}</th>
    </tr>     </tr>
 END  END
     $r->print(&Apache::loncommon::start_data_table_row());      $r->print(&Apache::loncommon::start_data_table_row());
Line 2276  END Line 2281  END
      <td>       <td>
 END  END
     foreach my $block (@{$typeorder}) {      foreach my $block (@{$typeorder}) {
         $r->print('<label><input type="checkbox" name="'.$block.'_'.$parmcount.'" value="1" />'.$types->{$block}.'</label><br />');          $r->print('<span class="LC_nobreak"><label><input type="checkbox" name="'.$block.'_'.$parmcount.'" value="1" />'.$types->{$block}.'</label></span><br />');
      }       }
      $r->print(<<"END");       $r->print(<<"END");
      </td>        </td>
      <td><label>$lt{'addb'}?&nbsp;<input type="checkbox" name="add_$parmcount" value="1" /></label></td>       <td><span class="LC_nobreak"><label>
        <input type="checkbox" name="add_$parmcount" value="1" />$lt{'addb'}
        </label></span></td>
 END  END
     $r->print(&Apache::loncommon::end_data_table_row());      $r->print(&Apache::loncommon::end_data_table_row());
     $r->print(&Apache::loncommon::end_data_table());      $r->print(&Apache::loncommon::end_data_table());
Removed from v.1.124.4.5  
changed lines
  Added in v.1.124.4.6

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