--- loncom/homework/structuretags.pm 2000/08/03 19:34:11 1.2 +++ loncom/homework/structuretags.pm 2000/08/16 18:32:58 1.3 @@ -17,9 +17,12 @@ sub start_block { my $code = @$parstack[$#$parstack]; $code =~ s/\"//g; $code .=';return $condition;'; +# print "
$code
"; my $result = &Apache::run::run($code,$safeeval); if ( ! $result ) { - my $skip=$$parser[$#$parser]->get_text("/block"); +# my $skip=$$parser[$#$parser]->get_text("/block"); + my $skip=&Apache::lonxml::get_all_text("block",$$parser[$#$parser]); +# print "skipped $skip"; } return ""; }