Diff for /rat/lonpage.pm between versions 1.64 and 1.65

version 1.64, 2004/12/10 19:59:55 version 1.65, 2004/12/12 21:06:36
Line 434  sub handler { Line 434  sub handler {
                               my $rid=$colcont[$j];                                my $rid=$colcont[$j];
                               my $metainfo = '';                                my $metainfo = '';
       my $esrc=&Apache::lonnet::declutter($hash{'src_'.$rid});        my $esrc=&Apache::lonnet::declutter($hash{'src_'.$rid});
         my ($mapid,$resid)=split(/\./,$rid);
         my $symb=&Apache::lonnet::encode_symb($hash{'map_id_'.$mapid},$resid,$hash{'src_'.$rid});
       if ($hash{'encrypted_'.$rid}) {        if ($hash{'encrypted_'.$rid}) {
     $symb=&Apache::lonenc::encrypted($symb);
   $esrc=&Apache::lonenc::encrypted($esrc);    $esrc=&Apache::lonenc::encrypted($esrc);
       }        }
                               unless ($hash{'src_'.$rid} =~ m-^/uploaded/-) {                                 unless ($hash{'src_'.$rid} =~ m-^/uploaded/-) { 
                                   $metainfo ='<a name="'.&Apache::lonnet::escape($esrc).'" />'.                                    $metainfo ='<a name="'.&Apache::lonnet::escape($symb).'" />'.
                                   '<a href="'.$metalink{$rid}.'" target="LONcatInfo">'.                                    '<a href="'.$metalink{$rid}.'" target="LONcatInfo">'.
                                   '<img src="/adm/lonMisc/cat_button.gif" border=0>'.                                    '<img src="/adm/lonMisc/cat_button.gif" border=0>'.
                                   '</img></a>';                                    '</img></a>';

Removed from v.1.64  
changed lines
  Added in v.1.65


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