--- loncom/homework/structuretags.pm 2001/01/08 13:55:08 1.29 +++ loncom/homework/structuretags.pm 2001/01/11 16:11:16 1.30 @@ -62,6 +62,11 @@ sub start_problem { my $args =''; if ( $#$parstack > -1 ) { $args=$$parstack[$#$parstack]; } my $name = &Apache::run::run("{$args;".'return $name}',$safeeval); + if ($name eq '') { + $name=&Apache::lonnet::EXT('resource.title'); + if ($name eq 'con_lost') { $name = ''; } + } + $Apache::lonhomework::name=$name; if ($status eq 'CAN_ANSWER') { # create a page header and exit return "$name\n\n
";