--- loncom/xml/lonxml.pm 2004/10/18 19:50:43 1.332.2.2 +++ loncom/xml/lonxml.pm 2004/07/27 23:35:34 1.333 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # XML Parser Module # -# $Id: lonxml.pm,v 1.332.2.2 2004/10/18 19:50:43 albertel Exp $ +# $Id: lonxml.pm,v 1.333 2004/07/27 23:35:34 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1127,7 +1127,8 @@ sub inserteditinfo { my $initialize=''; if ($filetype eq 'html') { my $addbuttons=&Apache::lonhtmlcommon::htmlareaaddbuttons(); - $initialize=&Apache::lonhtmlcommon::htmlareaheaders().(< $addbuttons @@ -1157,12 +1158,12 @@ $cleanbut BUTTONS - $buttons.=&Apache::lonhtmlcommon::htmlareaselectactive('filecont'); + $buttons.=&Apache::lonhtmlcommon::spelllink('xmledit','filecont'); my $editfooter=(< -
+ $xml_help $buttons
@@ -1529,12 +1530,6 @@ sub whichuser { if (defined($ENV{'form.grade_symb'})) { my $tmp_courseid=$ENV{'form.grade_courseid'}; my $allowed=&Apache::lonnet::allowed('vgr',$tmp_courseid); - if (!$allowed && - exists($ENV{'request.course.sec'}) && - $ENV{'request.course.sec'} !~ /^\s*$/) { - $allowed=&Apache::lonnet::allowed('vgr',$ENV{'form.grade_courseid'}. - '/'.$ENV{'request.course.sec'}); - } if ($allowed) { $symb=$ENV{'form.grade_symb'}; $courseid=$ENV{'form.grade_courseid'};