--- rat/lonuserstate.pm 2000/11/02 15:53:17 1.16 +++ rat/lonuserstate.pm 2000/11/02 17:46:43 1.17 @@ -25,7 +25,6 @@ use Apache::lonmsg; use Safe; use Opcode; - # ---------------------------------------------------- Globals for this package my $pc; # Package counter @@ -373,12 +372,11 @@ sub evalstate { $safeeval->permit("entereval"); $safeeval->permit(":base_math"); $safeeval->deny(":base_io"); - $safeeval->share_from('Apache::lonnet',['&varval']); + $safeeval->share_from('Apache::lonnet',['&EXT']); map { my $line=$_; chomp($line); my ($condition,$weight)=split(/\:/,$_); - $condition=~s/\[([\w\.]+)\]/\&varval\(\'$1\'\)/g; if ($safeeval->reval($condition)) { if ($weight eq 'force') { $state.='3';