--- loncom/homework/structuretags.pm 2004/02/06 22:38:24 1.227.2.2 +++ loncom/homework/structuretags.pm 2004/02/10 22:11:37 1.233 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.227.2.2 2004/02/06 22:38:24 albertel Exp $ +# $Id: structuretags.pm,v 1.233 2004/02/10 22:11:37 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -37,6 +37,7 @@ use Apache::lonnet; use Apache::File(); use Apache::lonmenu; use Apache::lonlocal; +use Apache::lonxml; BEGIN { &Apache::lonxml::register('Apache::structuretags',('block','languageblock','instructorcomment','while','randomlist','problem','library','web','tex','part','preduedate','postanswerdate','solved','notsolved','startouttext','endouttext', @@ -186,8 +187,12 @@ sub problem_edit_header {
-

 

- '; +
'. + &Apache::loncommon::help_open_topic('Problem_Editor_XML_Index', + 'Problem Editing Help').''. + &Apache::loncommon::help_open_faq(5). + &Apache::loncommon::help_open_bug('Authoring').'
'. + '
'; } sub problem_edit_footer { @@ -208,8 +213,9 @@ sub problem_web_to_edit_header { onChange="javascript:document.lonhomework.changerandseed.click()" /> '; + $result.= ' />'.&mt(' Show All Foils'). + &Apache::loncommon::help_open_topic('Problem_Editor_Testing_Area','Testing Problems'). + '
'; my $numtoanalyze=$ENV{'form.numtoanalyze'}; if (!$numtoanalyze) { $numtoanalyze=20; } $result.= ''.$filename); print $temp_file "$duedate\n"; @@ -978,6 +984,8 @@ sub start_part { } } if (($Apache::lonhomework::type eq 'exam') && ($allow_print_points)) { $result .= '\fbox{\textit{'.$weight.' pt}}';} + } elsif ($target eq 'web') { + $result.=''; } } }