--- loncom/homework/response.pm	2005/06/17 20:17:02	1.121
+++ loncom/homework/response.pm	2005/06/29 19:20:10	1.122
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # various response type definitons response definition
 #
-# $Id: response.pm,v 1.121 2005/06/17 20:17:02 albertel Exp $
+# $Id: response.pm,v 1.122 2005/06/29 19:20:10 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -739,6 +739,8 @@ sub submitted {
     # if the Submit Answer button for this particular part was pressed
     my $partid=$Apache::inputtags::part;
     if (defined($env{'form.submit_'.$partid})) { return 1; }
+    # Submit All button on a .page was pressed
+    if (defined($env{'form.all_submit'})) { return 1; }
     # otherwise no submission occured
     return 0;
 }