--- rat/lonpage.pm 2000/09/23 20:12:46 1.8 +++ rat/lonpage.pm 2000/09/25 20:31:33 1.9 @@ -122,7 +122,22 @@ sub handler { } } +# ------------------------------------------------------------ Add to symb list + my $i; + my %symbhash=(); + for ($i=0;$i<=$#rows;$i++) { + if ($rows[$i]) { + my @colcont=split(/\&/,$rows[$i]); + map { + $symbhash{$hash{'src_'.$_}}=''; + } @colcont; + } + } + &Apache::lonnet::symblist($requrl,%symbhash); + +# ------------------------------------------------------------------ Page parms + my $j; my $lcm=1; my $contents=0; @@ -246,7 +261,6 @@ sub handler { } else { $r->print('
'); } - # ------------------------------------------------------------------ Start form if ($nforms) { $r->print('