![[BACK]](/icons/back.gif){kind=icon}
Return to response.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework|
Return to response.pm CVS log | Up to [LON-CAPA] / loncom / homework |
| version 1.130, 2005/11/21 22:45:13 | version 1.131, 2005/11/29 18:42:54 |
|---|---|
| Line 859 sub submitted { | Line 859 sub submitted { |
| } | } |
| sub add_to_gradingqueue { | sub add_to_gradingqueue { |
| my ($nothing) = @_; | my ($symb,$courseid,$domain,$name) = &Apache::lonxml::whichuser(); |
| if ( $courseid eq '' | |
| || $symb eq '' | |
| || $env{'request.state'} eq 'construct') { | |
| return; | |
| } | |
| my %queue_info = ( 'type' => 'problem', | my %queue_info = ( 'type' => 'problem', |
| 'time' => time); | 'time' => time); |