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

Diff for /loncom/interface/londocs.pm between versions 1.84 and 1.85

version 1.84, 2003/09/28 00:14:25 version 1.85, 2003/10/04 20:49:40
Line 395  sub entryline { Line 395  sub entryline {
  ) {    ) { 
             $foldertitle=&Apache::lontexconvert::msgtexconverted($4);              $foldertitle=&Apache::lontexconvert::msgtexconverted($4);
             $renametitle=$4;              $renametitle=$4;
             $title='<i>'.localtime($1).'</i> '.              $title='<i>'.&Apache::lonlocal::locallocaltime($1).'</i> '.
                 &Apache::loncommon::plainname($2,$3).': <br>'.                  &Apache::loncommon::plainname($2,$3).': <br>'.
  $foldertitle;   $foldertitle;
  }   }
Line 594  sub checkversions { Line 594  sub checkversions {
        }         }
        my $starttime=time-$ENV{'form.timerange'};         my $starttime=time-$ENV{'form.timerange'};
        if ($ENV{'form.timerange'}==2592000) {         if ($ENV{'form.timerange'}==2592000) {
            $seltext=&mt('during the last month').' ('.localtime($starttime).')';             $seltext=&mt('during the last month').' ('.&Apache::lonlocal::locallocaltime($starttime).')';
            $monthsel='selected';             $monthsel='selected';
        } elsif ($ENV{'form.timerange'}==604800) {         } elsif ($ENV{'form.timerange'}==604800) {
            $seltext=&mt('during the last week').' ('.localtime($starttime).')';             $seltext=&mt('during the last week').' ('.&Apache::lonlocal::locallocaltime($starttime).')';
            $weeksel='selected';             $weeksel='selected';
        } elsif ($ENV{'form.timerange'}==86400) {         } elsif ($ENV{'form.timerange'}==86400) {
            $seltext=&mt('since yesterday').' ('.localtime($starttime).')';             $seltext=&mt('since yesterday').' ('.&Apache::lonlocal::locallocaltime($starttime).')';
            $daysel='selected';             $daysel='selected';
        }         }
        my %lt=&Apache::lonlocal::texthash         my %lt=&Apache::lonlocal::texthash
Line 638  ENDHEADERS Line 638  ENDHEADERS
              $r->print(               $r->print(
                  '<tr><td><a href="'.$linkurl.'" target="cat">'.$linkurl.                   '<tr><td><a href="'.$linkurl.'" target="cat">'.$linkurl.
                  '</a></td><td>'.                   '</a></td><td>'.
                  localtime($changes{$_}).'</td><td>'.$currentversion.'</td>'.                   &Apache::lonlocal::locallocaltime($changes{$_}).'</td><td>'.$currentversion.'</td>'.
        '<td>');         '<td>');
              my $lastold=1;               my $lastold=1;
              for (my $prevvers=1;$prevvers<$currentversion;$prevvers++) {               for (my $prevvers=1;$prevvers<$currentversion;$prevvers++) {
Line 651  ENDHEADERS Line 651  ENDHEADERS
             for (my $prevvers=$lastold;$prevvers<$currentversion;$prevvers++) {              for (my $prevvers=$lastold;$prevvers<$currentversion;$prevvers++) {
                  my $url=$root.'.'.$prevvers.'.'.$extension;                   my $url=$root.'.'.$prevvers.'.'.$extension;
                  $r->print('<a href="'.&Apache::lonnet::clutter($url).                   $r->print('<a href="'.&Apache::lonnet::clutter($url).
                    '">Version '.$prevvers.' ('.                     '">'.&mt('Version').' '.$prevvers.' ('.
                  localtime(&Apache::lonnet::metadata($url,'lastrevisiondate')).                   &Apache::lonlocal::locallocaltime(&Apache::lonnet::metadata($url,'lastrevisiondate')).
                  ')</a>');                   ')</a>');
                  if (&Apache::loncommon::fileembstyle($extension) eq 'ssi') {                   if (&Apache::loncommon::fileembstyle($extension) eq 'ssi') {
                     $r->print(' <a href="/adm/diff?filename='.                      $r->print(' <a href="/adm/diff?filename='.
Removed from v.1.84  
changed lines
  Added in v.1.85

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