|
version 1.276, 2003/09/14 23:57:18
|
version 1.278, 2003/09/15 19:56:44
|
|
Line 175 sub xmlbegin {
|
Line 175 sub xmlbegin {
|
| } |
} |
| |
|
| sub xmlend { |
sub xmlend { |
| my ($discussiononly,$symb)=@_; |
my $mode='xml'; |
| my $discussion=''; |
my $status='OPEN'; |
| if ($ENV{'request.course.id'}) { |
if ($Apache::lonhomework::parsing_a_problem) { |
| my $crs='/'.$ENV{'request.course.id'}; |
$mode='problem'; |
| if ($ENV{'request.course.sec'}) { |
$status=$Apache::inputtags::status[-1]; |
| $crs.='_'.$ENV{'request.course.sec'}; |
|
| } |
|
| $crs=~s/\_/\//g; |
|
| $discussion=&Apache::lonfeedback::list_discussion |
|
| ($crs,$symb,$discussiononly); |
|
| } |
} |
| return $discussion.($discussiononly?'':'</html>'); |
return &Apache::lonfeedback::list_discussion().'</html>'; |
| } |
} |
| |
|
| sub tokeninputfield { |
sub tokeninputfield { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonxml.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / xml