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

Diff for /loncom/interface/lonmsgdisplay.pm between versions 1.129 and 1.133

version 1.129, 2009/07/26 20:39:46 version 1.133, 2009/08/28 23:27:32
Line 558  sub discourse { Line 558  sub discourse {
        $result .= '<fieldset id="LC_futureusers"><legend>'         $result .= '<fieldset id="LC_futureusers"><legend>'
                  .&mt('Bcc: course members with future access')                   .&mt('Bcc: course members with future access')
                  .'</legend>'                   .'</legend>'
                  .'<form name="previoususers">';                   .'<form name="futureusers">';
        $result .= $tmptext.'</form></fieldset>';         $result .= $tmptext.'</form></fieldset>';
        if (ref($statushash) eq 'HASH') {         if (ref($statushash) eq 'HASH') {
            $statushash->{'future'} = 1;             $statushash->{'future'} = 1;
Line 1097  ENDDISHEADER Line 1097  ENDDISHEADER
     $r->print("</tr>\n");      $r->print("</tr>\n");
   
     my $suffix = &Apache::lonmsg::foldersuffix($folder);      my $suffix = &Apache::lonmsg::foldersuffix($folder);
     my $count = 0;      my $count = $firstdis;
     for (my $n=$firstdis;$n<=$lastdis;$n++) {      for (my $n=$firstdis;$n<=$lastdis;$n++) {
  my ($sendtime,$shortsubj,$fromname,$fromdomain,$status,$origID,   my ($sendtime,$shortsubj,$fromname,$fromdomain,$status,$origID,
     $description,$recv_name,$recv_domain)=       $description,$recv_name,$recv_domain)= 
Line 1221  sub blocked_in_folder { Line 1221  sub blocked_in_folder {
     #$output .= &Apache::loncommon::build_block_table($startblock,$endblock,      #$output .= &Apache::loncommon::build_block_table($startblock,$endblock,
     #                                                 $setters);      #                                                 $setters);
           
     my ($blocked, $blocktext) = &Apache::loncommon::blocking_status("msgdisplay");      my ($blocked, $blocktext) = &Apache::loncommon::blocking_status("com");
     $output .="<br />".$blocktext;      $output .="<br /><br />".$blocktext;
   
     return $output;      return $output;
 }  }
Line 2281  sub displaymessage { Line 2281  sub displaymessage {
         &printheader($r,'/adm/email',&mt('Display a Message'));          &printheader($r,'/adm/email',&mt('Display a Message'));
         #$r->print(&mt('You attempted to display a message that is currently blocked because you are enrolled in one or more courses for which there is an ongoing online exam.'));          #$r->print(&mt('You attempted to display a message that is currently blocked because you are enrolled in one or more courses for which there is an ongoing online exam.'));
         #&build_block_table($r,$startblock,$endblock,\%setters);          #&build_block_table($r,$startblock,$endblock,\%setters);
         my($blocked, $blocktext) = &Apache::loncommon::blocking_status("msgdisplay");          my($blocked, $blocktext) = &Apache::loncommon::blocking_status("com");
         $r->print("<br />".$blocktext);          $r->print("<br />".$blocktext);
         return;          return;
     }      }
Removed from v.1.129  
changed lines
  Added in v.1.133

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