Diff for /loncom/xml/scripttag.pm between versions 1.105 and 1.106

version 1.105, 2003/12/10 22:11:56 version 1.106, 2004/01/16 19:46:03
Line 202  sub start_scriptlib { Line 202  sub start_scriptlib {
   my $result ='';    my $result ='';
   my $error='';    my $error='';
   
   if ($target eq 'web' || $target eq 'grade' || $target eq 'meta' ||     if ($target eq 'web' || $target eq 'tex' || $target eq 'grade' ||
       $target eq 'edit' || $target eq 'answer' || $target eq 'analyze') {        $target eq 'meta' || $target eq 'edit' || $target eq 'answer' ||
         $target eq 'analyze') {
     $bodytext=$$parser[$#$parser]->get_text("/scriptlib");      $bodytext=$$parser[$#$parser]->get_text("/scriptlib");
     $bodytext=&Apache::run::evaluate($bodytext,$safeeval,      $bodytext=&Apache::run::evaluate($bodytext,$safeeval,
      $$parstack[$#$parstack]);       $$parstack[$#$parstack]);
Line 247  sub start_parserlib { Line 248  sub start_parserlib {
   my $bodytext;    my $bodytext;
   my $result ="";    my $result ="";
   my $error='';    my $error='';
   if ($target eq 'web' || $target eq 'grade' || $target eq 'meta' ||    if ($target eq 'web' || $target eq 'tex' || $target eq 'grade' ||
       $target eq 'edit' || $target eq 'answer' || $target eq 'analyze') {        $target eq 'meta' || $target eq 'edit' || $target eq 'answer' ||
         $target eq 'analyze') {
     $bodytext=$$parser[$#$parser]->get_text("/parserlib");      $bodytext=$$parser[$#$parser]->get_text("/parserlib");
     $bodytext=&Apache::run::evaluate($bodytext,$safeeval,      $bodytext=&Apache::run::evaluate($bodytext,$safeeval,
      $$parstack[$#$parstack]);       $$parstack[$#$parstack]);

Removed from v.1.105  
changed lines
  Added in v.1.106


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