|
version 1.308, 2005/11/03 11:10:25
|
version 1.309, 2005/11/03 11:32:00
|
|
Line 693 sub start_problem {
|
Line 693 sub start_problem {
|
| # The big change; Due do the comparison on |
# The big change; Due do the comparison on |
| # the absolute time rather than textual time since that is format independent. |
# the absolute time rather than textual time since that is format independent. |
| # |
# |
| if ($due_file_content ne $duetime) { |
if ($due_file_content != $duetime) { |
| $temp_file = Apache::File->new('>'.$filename); |
$temp_file = Apache::File->new('>'.$filename); |
| print $temp_file "$duetime\n"; |
print $temp_file "$duetime\n"; |
| if (not $env{'request.symb'} =~ m/\.page_/) { |
if (not $env{'request.symb'} =~ m/\.page_/) { |
|
Line 716 sub start_problem {
|
Line 716 sub start_problem {
|
| } |
} |
| } |
} |
| } |
} |
| |
&Apache::lonxml::startredirection; # We'll do redirection to deal with duedates. |
| } elsif ($target eq 'edit') { |
} elsif ($target eq 'edit') { |
| $result.=$head_tag_start."</head>".$body_tag_start.$form_tag_start. |
$result.=$head_tag_start."</head>".$body_tag_start.$form_tag_start. |
| &problem_edit_header(); |
&problem_edit_header(); |
|
Line 736 sub start_problem {
|
Line 737 sub start_problem {
|
| sub end_problem { |
sub end_problem { |
| my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; |
| my $result=''; |
my $result=''; |
| |
if ($target eq 'tex') { |
| |
$result = &Apache::lonxml::endredirection; |
| |
} |
| my $status=$Apache::inputtags::status['-1']; |
my $status=$Apache::inputtags::status['-1']; |
| if ($target eq 'grade' || $target eq 'web' || $target eq 'answer' || |
if ($target eq 'grade' || $target eq 'web' || $target eq 'answer' || |
| $target eq 'tex') { |
$target eq 'tex') { |
![[BACK]](/icons/back.gif){kind=icon}
Return to structuretags.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework