Return to lonuserstate.pm CVS log | Up to [LON-CAPA] / rat |
version 1.112, 2006/05/12 15:30:53 | version 1.113, 2006/05/25 21:09:45 |
---|---|
Line 681 sub evalstate { | Line 681 sub evalstate { |
if (-e $fn) { | if (-e $fn) { |
my @conditions=(); | my @conditions=(); |
{ | { |
my $fh=Apache::File->new($fn); | open(my $fh,$fn); |
@conditions=<$fh>; | @conditions=<$fh>; |
} | } |
my $safeeval = new Safe; | my $safeeval = new Safe; |