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

Diff for /loncom/interface/lonannounce.pm between versions 1.43 and 1.46

version 1.43, 2006/01/12 23:36:45 version 1.46, 2006/03/15 21:55:43
Line 64  $help Line 64  $help
 <tr><td>$lt{'end'}:</td><td>$enddateform</td></tr></table>  <tr><td>$lt{'end'}:</td><td>$enddateform</td></tr></table>
 <textarea name="msg" rows="4" cols="60">$text</textarea>  <textarea name="msg" rows="4" cols="60">$text</textarea>
 <br />  <br />
 <!-- <label><input type="checkbox" name="rsspost" /> $lt{'incrss'}</label> -->  <label><input type="checkbox" name="rsspost" /> $lt{'incrss'}</label>
 <br /><input type="button" onClick="trysubmit()" value="$lt{'post'}" /><hr />  <br /><input type="button" onClick="trysubmit()" value="$lt{'post'}" /><hr />
 ENDFORM  ENDFORM
 }  }
Line 106  sub readcalendar { Line 106  sub readcalendar {
  my $realm=&mt('All Resources');   my $realm=&mt('All Resources');
  if ($middle=~/^(.+)\_\_\_\(all\)$/) {   if ($middle=~/^(.+)\_\_\_\(all\)$/) {
     my $map_url=$1;      my $map_url=$1;
       if (!$can_see_hidden && !$navmap) {
    next;
       }
     if (!$can_see_hidden) {      if (!$can_see_hidden) {
  my $res = $navmap->getResourceByUrl($map_url);   my $res = $navmap->getResourceByUrl($map_url);
  if ($res->randomout()) { next; }   if ($res && $res->randomout()) { next; }
     }      }
     $realm=&mt('Folder/Map').': '.&Apache::lonnet::gettitle($map_url);      $realm=&mt('Folder/Map').': '.&Apache::lonnet::gettitle($map_url);
  } elsif ($middle) {   } elsif ($middle) {
       if (!$can_see_hidden && !$navmap) {
    next;
       }
     if (!$can_see_hidden) {      if (!$can_see_hidden) {
  my $res = $navmap->getBySymb($middle);   my $res = $navmap->getBySymb($middle);
  if ($res->randomout()) { next; }   if ($res && $res->randomout()) { next; }
     }      }
     $realm=&mt('Resource').': '.&Apache::lonnet::gettitle($middle);      $realm=&mt('Resource').': '.&Apache::lonnet::gettitle($middle);
  }   }
Removed from v.1.43  
changed lines
  Added in v.1.46

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