--- loncom/homework/randomlabel.pm 2002/03/08 20:43:06 1.19 +++ loncom/homework/randomlabel.pm 2002/03/22 22:04:39 1.21 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # random labelling tool # -# $Id: randomlabel.pm,v 1.19 2002/03/08 20:43:06 albertel Exp $ +# $Id: randomlabel.pm,v 1.21 2002/03/22 22:04:39 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -69,7 +69,7 @@ sub start_randomlabel { my $result=''; $Apache::lonxml::extlinks[$#Apache::lonxml::extlinks+1]= '/res/adm/includes/GLabel.class'; - + push (@Apache::lonxml::namespace,'randomlabel'); my $bgimg= &Apache::lonxml::get_param('bgimg',$parstack,$safeeval); if ( $bgimg !~ /^http:/ ) { @@ -124,8 +124,7 @@ sub end_randomlabel { my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; my $result=''; my $count; - - + pop @Apache::lonxml::namespace; if ($target eq 'web') { $count = $Apache::randomlabel::tlabel_cnt; if( $count != 0) { $result.= ""; }