--- loncom/homework/structuretags.pm 2006/01/02 22:34:31 1.329 +++ loncom/homework/structuretags.pm 2006/01/18 20:16:43 1.331 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.329 2006/01/02 22:34:31 albertel Exp $ +# $Id: structuretags.pm,v 1.331 2006/01/18 20:16:43 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1166,7 +1166,7 @@ sub start_randomlist { my $result; if ($target eq 'answer' || $target eq 'grade' || $target eq 'web' || $target eq 'tex' || $target eq 'analyze') { - my $body= &Apache::lonxml::get_all_text("/randomlist",$parser,$style); + my $body= &Apache::lonxml::get_all_text("/randomlist",$parser); my $b_parser= HTML::LCParser->new(\$body); $b_parser->xml_mode(1); $b_parser->marked_sections(1); @@ -1586,7 +1586,7 @@ sub start_simpleeditbutton { my $result=''; if (($env{'form.simple_edit_button'} ne 'off') && ($target eq 'web') && - (&Apache::lonnet::allowed('srm',$env{'request.course.id'}))) { + (&Apache::lonnet::allowed('mdc',$env{'request.course.id'}))) { my $url=$env{'request.noversionuri'}; $url=~s/\?.*$//; my ($symb) = &Apache::lonxml::whichuser();