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

Diff for /loncom/interface/Attic/lonchart.pm between versions 1.2 and 1.3

version 1.2, 2001/01/31 23:28:06 version 1.3, 2001/02/05 18:58:04
Line 209  sub handler { Line 209  sub handler {
                       'Data not available: '.$name;                        'Data not available: '.$name;
                 } else {                  } else {
                     my %reply=&Apache::lonnet::idrget($sdom,$sname);                      my %reply=&Apache::lonnet::idrget($sdom,$sname);
                     my $reply=&Apache::lonnet::reply('get:'.$sdom.':'.$sname.      my $reply=&Apache::lonnet::reply('get:'.$sdom.':'.$sname.
       ':environment:firstname&middlename&lastname&generation',                                                       ':environment:lastname&generation&firstname&middlename',
                       &Apache::lonnet::homeserver($sname,$sdom));                                                       &Apache::lonnet::homeserver($sname,$sdom));
                     $rowlabels[$thisindex]=                      $rowlabels[$thisindex]=
                       $ssec.' '.$reply{$sname}.' ';                        sprintf('%3s',$ssec).' '.$reply{$sname}.' ';
                       my $i=0;
                     map {                      map {
                      $rowlabels[$thisindex].=&Apache::lonnet::unescape($_).' ';                        $i++;
                         if ( $_ ne '') {
                           $rowlabels[$thisindex].=&Apache::lonnet::unescape($_).'
   ';
                         }
                         if ($i == 2) {
                           chop($rowlabels[$thisindex]);
                           $rowlabels[$thisindex].=', ';
                         }
                     } split(/\&/,$reply);                      } split(/\&/,$reply);
                 }      
    }
             }              }
         } sort split(/\&/,$classlst);          } sort split(/\&/,$classlst);
   
Removed from v.1.2  
changed lines
  Added in v.1.3

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