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

Diff for /loncom/interface/lonmsgdisplay.pm between versions 1.103 and 1.104

version 1.103, 2008/12/14 00:33:35 version 1.104, 2008/12/14 02:45:48
Line 353  sub makefolder { Line 353  sub makefolder {
         }          }
     } else {      } else {
         $outcome =           $outcome = 
     &mt('Error - could not obtain lock on e-mail folders record.');      &mt('Error - could not obtain lock on message folders record.');
     }      }
     return ($outcome,$warning);      return ($outcome,$warning);
 }  }
Line 559  sub disgroup { Line 559  sub disgroup {
     my $result;      my $result;
     #  Needs to be in a course      #  Needs to be in a course
     if (!($env{'request.course.fn'})) {      if (!($env{'request.course.fn'})) {
         $result = &mt('Error: you must have a course role selected to be able to send a broadcast           $result = &mt('Error: you must have a course role selected to be able to send a broadcast message to a group in the course.');
 e-mail to a group in the course.');  
         return $result;          return $result;
     }      }
     if ($cdom eq '' || $cnum eq '') {      if ($cdom eq '' || $cnum eq '') {
Line 2312  sub displaymessage { Line 2311  sub displaymessage {
               .$li_end;                .$li_end;
     }      }
 # Print functions  # Print functions
     $r->print('<div>'      $r->print('<div class="LC_left_float">'
              .'<fieldset>'               .'<fieldset>'
              .'<legend><span class="LC_mail_functions">'               .'<legend><span class="LC_mail_functions">'
              .&mt('Functions')               .&mt('Functions')
Line 2353  sub displaymessage { Line 2352  sub displaymessage {
   
 # Print actions  # Print actions
         if ($actionlist) {          if ($actionlist) {
             $r->print('<div>'              $r->print('<div class="LC_left_float">'
                      .'<fieldset>'                       .'<fieldset>'
                      .'<legend>'                       .'<legend>'
                      .&mt('Currently available actions (will open extra window):')                       .&mt('[_1]Currently available actions[_2] (will open extra window):','<span class="LC_mail_functions">','</span>')
                      .'</legend>'                       .'</legend>'
                      .$actionlist                       .$actionlist
                      .'</fieldset>'                       .'</fieldset>'
Line 2400  sub displaymessage { Line 2399  sub displaymessage {
     if (defined($content{'baseurl'})) {      if (defined($content{'baseurl'})) {
         $baseurl = &Apache::lonenc::check_encrypt($content{'baseurl'});          $baseurl = &Apache::lonenc::check_encrypt($content{'baseurl'});
     }      }
       $r->print('<div class="LC_clear_float_footer">');
     if ($from_student && $see_anonymous ) {      if ($from_student && $see_anonymous ) {
  $r->print(&Apache::loncommon::student_image_tag($content{'senderdomain'},$content{'sendername'}));   $r->print(&Apache::loncommon::student_image_tag($content{'senderdomain'},$content{'sendername'}).'</br>');
     }      }
   
     my $broadcast_link;      my $broadcast_link;
Line 2414  sub displaymessage { Line 2414  sub displaymessage {
   
     # Display LON-CAPA Message (Start)      # Display LON-CAPA Message (Start)
     # Subject      # Subject
     $r->print('<br />'      $r->print('</div>'
              .&Apache::lonhtmlcommon::start_pick_box()               .&Apache::lonhtmlcommon::start_pick_box()
              .&Apache::lonhtmlcommon::row_title(&mt('Subject'))               .&Apache::lonhtmlcommon::row_title(&mt('Subject'))
              .$content{'subject'}               .$content{'subject'}
Removed from v.1.103  
changed lines
  Added in v.1.104

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