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

Diff for /loncom/interface/lonnotify.pm between versions 1.35 and 1.36

version 1.35, 2009/05/20 20:27:37 version 1.36, 2010/05/14 18:29:52
Line 118  sub start_page { Line 118  sub start_page {
 $start_page  $start_page
 $breadcrumbs  $breadcrumbs
 <br />  <br />
 <form name="$formname" method="post">  <form name="$formname" method="post" action="">
 ENDONE  ENDONE
   
     return $output;      return $output;
Line 143  function next_page(caller) { Line 143  function next_page(caller) {
 }  }
     |;       |; 
   
     my $output = &start_page(&add_script($jscript),  
      'Broadcast e-mail to Domain', $formname);  
   
     $output .= '<input type="hidden" name="command" />';      my @menu=
     $output .= '<table class="LC_notify_front_page">'.          ({  categorytitle=>'Broadcast e-mail to Domain',
               '<tr><td><a href="javascript:next_page('."'new'".')">'.          items =>[
               &mt('Send a new e-mail to selected users from this domain').'</a></td></tr><tr>'.              {   linktext => 'Send e-mail to selected users',
               '<td><a href="javascript:next_page('."'view'".')">'.                  url => 'javascript:next_page('."'new'".')',
               &mt('Display e-mail sent by Domain Coordinators in this domain').                  permission => 1,
               '</a></td></tr></table>';                  #help => '',
     $output .= &end_page();                  icon => 'mail-reply-all.png',
                   linktitle => 'Send a new e-mail to selected users from this domain'
     $r->print($output);              },
               {   linktext => 'Display sent e-mails',
                   url => 'javascript:next_page('."'view'".')',
                   permission => 1,
                   #help => '',
                   icon => 'messalog.png',
                   linktitle => 'Display e-mail sent by Domain Coordinators in this domain'
               },
           ]
           },
           );
   
       $r->print(
           &start_page(&add_script($jscript),
               'Broadcast e-mail to Domain', $formname)
          .'<input type="hidden" name="command" />'
          .&Apache::lonhtmlcommon::generate_menu(@menu)
          .&end_page()
       );
     return;      return;
 }  }
   
Removed from v.1.35  
changed lines
  Added in v.1.36

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