![[BACK]](/icons/back.gif){kind=icon}
Return to lonuserstate.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / rat|
Return to lonuserstate.pm CVS log | Up to [LON-CAPA] / rat |
| version 1.114, 2006/05/30 17:15:10 | version 1.115, 2006/05/30 19:11:37 |
|---|---|
| Line 686 sub evalstate { | Line 686 sub evalstate { |
| if (-e $fn) { | if (-e $fn) { |
| my @conditions=(); | my @conditions=(); |
| { | { |
| open(my $fh,$fn); | open(my $fh,"<$fn"); |
| @conditions=<$fh>; | @conditions=<$fh>; |
| close($fh); | |
| } | } |
| my $safeeval = new Safe; | my $safeeval = new Safe; |
| my $safehole = new Safe::Hole; | my $safehole = new Safe::Hole; |