--- loncom/homework/inputtags.pm 2011/06/06 21:25:54 1.288 +++ loncom/homework/inputtags.pm 2011/06/10 17:10:17 1.291 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # input definitons # -# $Id: inputtags.pm,v 1.288 2011/06/06 21:25:54 www Exp $ +# $Id: inputtags.pm,v 1.291 2011/06/10 17:10:17 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -885,8 +885,8 @@ sub decideoutput { $message=&mt('Incorrect.'); $css_class=$possible_class{'charged_try'}; } - if ($env{'request.filename'} =~ - m|/res/lib/templates/examupload.problem$|) { + if ($handgrade || + ($env{'request.filename'}=~/\/res\/lib\/templates\/(examupload|DropBox).problem$/)) { $message = &mt("A score has been assigned."); $added_computer_text=1; } else { @@ -1321,6 +1321,9 @@ sub setgradedata { &Apache::response::add_to_gradingqueue(); } $Apache::lonhomework::results{"resource.$id.type"} = $Apache::lonhomework::type; + $Apache::lonhomework::results{"resource.$id.duedate"} = &Apache::lonnet::EXT("resource.$id.duedate"); + $Apache::lonhomework::results{"resource.$id.hinttries"} = &Apache::lonnet::EXT("resource.$id.hinttries"); + $Apache::lonhomework::results{"resourse.$id.version"} = &Apache::lonnet::usedversion(); } sub find_which_previous {