Diff for /loncom/homework/response.pm between versions 1.153 and 1.154

version 1.153, 2006/12/11 17:37:43 version 1.154, 2006/12/11 22:02:13
Line 491  sub start_mathresponse { Line 491  sub start_mathresponse {
  my $args_ref= \%{$safeeval->varglob('LONCAPA::mathresponse_args')};   my $args_ref= \%{$safeeval->varglob('LONCAPA::mathresponse_args')};
  undef(%{ $args_ref });   undef(%{ $args_ref });
  $$args_ref{'cas'}=$token->[2]{'cas'};   $$args_ref{'cas'}=$token->[2]{'cas'};
  $$args_ref{'args'}=$token->[2]{'args'};          if ($token->[2]{'args'}=~/\$/) {
       $$args_ref{'args'}=&Apache::run::run($token->[2]{'args'},$safeeval);
    } elsif ($token->[2]{'args'}=~/\@/) {
       $$args_ref{'args'}=&Apache::run::run('join(",",'.$token->[2]{'args'}.')',$safeeval);
    } else {
       $$args_ref{'args'}=$token->[2]{'args'};
    }
     } elsif ($target eq 'meta') {      } elsif ($target eq 'meta') {
  $result .= &Apache::response::meta_package_write('mathresponse');   $result .= &Apache::response::meta_package_write('mathresponse');
     }      }

Removed from v.1.153  
changed lines
  Added in v.1.154


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