--- loncom/homework/structuretags.pm 2002/08/29 21:21:09 1.109 +++ loncom/homework/structuretags.pm 2002/10/01 21:04:34 1.121 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.109 2002/08/29 21:21:09 albertel Exp $ +# $Id: structuretags.pm,v 1.121 2002/10/01 21:04:34 sakharuk Exp $ # # Copyright Michigan State University Board of Trustees # @@ -161,7 +161,7 @@ sub problem_web_to_edit_header { Show All Foils + $result.= ' /> Show All Foils
]*)>//g;
- $string =~ s/<\/td>//g;
- $string =~ s//\\textbf{/g;
- $string =~ s/<\/b>/}/g;
- $string =~ s/ /\\vskip 0 mm /g; - $string =~ s/]*)>//g; - return $string; -} sub start_library { my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; @@ -462,7 +449,8 @@ sub start_library { } elsif ($target eq 'modified') { $result=$token->[4]; $result.=&Apache::edit::handle_insert(); - } elsif ($target eq 'web' && $ENV{'request.state'} eq "construct" ) { + } elsif ($target eq 'web' && $$tagstack[0] ne 'problem' && + $ENV{'request.state'} eq "construct" ) { ($result,$head_tag_start,$body_tag_start,$form_tag_start)= &page_start($target,$token,$tagstack,$parstack,$parser,$safeeval); my $name=&get_resource_name($parstack,$safeeval); @@ -480,7 +468,8 @@ sub end_library { my $result=''; if ($target eq 'edit') { $result=&problem_edit_footer(); - } elsif ($target eq 'web' && $ENV{'request.state'} eq "construct") { + } elsif ($target eq 'web' && $$tagstack[0] ne 'problem' && + $ENV{'request.state'} eq "construct") { $result.=' |