--- loncom/interface/lonparmset.pm	2002/09/07 17:30:31	1.66
+++ loncom/interface/lonparmset.pm	2002/09/07 17:53:05	1.67
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
-# $Id: lonparmset.pm,v 1.66 2002/09/07 17:30:31 www Exp $
+# $Id: lonparmset.pm,v 1.67 2002/09/07 17:53:05 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -804,6 +804,10 @@ sub assessparms {
 	if ($reply=~/^error\:(.*)/) {
 	    $message.="<font color=red>Write Error: $1</font>";
 	}
+# --------------------------------------------- Devalidate cache for this child
+        &Apache::lonnet::devalidatecourseresdata(
+                 $ENV{'course.'.$ENV{'request.course.id'}.'.num'},
+                 $ENV{'course.'.$ENV{'request.course.id'}.'.domain'});
 # ---------------------------------------------------------------- Done storing
     }
 # -------------------------------------------------------------- Get coursedata