--- loncom/homework/structuretags.pm 2004/06/03 14:28:39 1.254
+++ loncom/homework/structuretags.pm 2004/08/13 18:51:33 1.260.2.1
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# definition of tags that give a structure to a document
#
-# $Id: structuretags.pm,v 1.254 2004/06/03 14:28:39 www Exp $
+# $Id: structuretags.pm,v 1.260.2.1 2004/08/13 18:51:33 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -58,10 +58,11 @@ sub start_tex {
my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;
my $result='';
my $bodytext=&Apache::lonxml::get_all_text("/tex",$parser);
+ &Apache::lonnet::logthis("Hrrm? $bodytext --");
if ($target eq 'tex') {
return $bodytext.' ';
}
- return $result;;
+ return $result;
}
sub end_tex {
@@ -84,7 +85,6 @@ sub page_start {
$parstack,$parser,$safeeval);
$head_tag_start='
'.&Apache::lonmenu::registerurl(undef,$target).
&Apache::lonhtmlcommon::htmlareaheaders();
- @Apache::lonxml::htmlareafields=();
}
my $body_tag_start;
if (!defined($found{'body'})) {
@@ -192,16 +192,16 @@ 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').' |
'.
+ &Apache::loncommon::help_open_menu('','Problem Editing Help','Problem_Editor_XML_Index','',5,'Authoring',undef,undef,undef,'Problem Editing Help')
+ .''.
'';
}
sub problem_edit_footer {
return ' |
- ';
+ '.
+ &Apache::lonhtmlcommon::htmlareaselectactive(@Apache::lonxml::htmlareafields).
+ "\n\n\n