--- loncom/homework/inputtags.pm	2005/11/21 21:51:29	1.183
+++ loncom/homework/inputtags.pm	2005/11/21 22:45:13	1.184
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # input  definitons
 #
-# $Id: inputtags.pm,v 1.183 2005/11/21 21:51:29 albertel Exp $
+# $Id: inputtags.pm,v 1.184 2005/11/21 22:45:13 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -790,6 +790,9 @@ sub setgradedata {
 	return '';
     }
     $Apache::lonhomework::results{"resource.$id.award"} = $award;
+    if ($award eq 'SUBMITTED') {
+	&Apache::response::add_to_gradingqueue();
+    }
 }
 
 sub grade {