[LON-CAPA-cvs] cvs: loncom /interface lonparmset.pm

www lon-capa-cvs@mail.lon-capa.org
Sat, 07 Sep 2002 18:25:42 -0000


www		Sat Sep  7 14:25:42 2002 EDT

  Modified files:              
    /loncom/interface	lonparmset.pm 
  Log:
  Always devalidates resoursedata cache before displaying
  
  
Index: loncom/interface/lonparmset.pm
diff -u loncom/interface/lonparmset.pm:1.67 loncom/interface/lonparmset.pm:1.68
--- loncom/interface/lonparmset.pm:1.67	Sat Sep  7 13:53:05 2002
+++ loncom/interface/lonparmset.pm	Sat Sep  7 14:25:42 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
-# $Id: lonparmset.pm,v 1.67 2002/09/07 17:53:05 www Exp $
+# $Id: lonparmset.pm,v 1.68 2002/09/07 18:25:42 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -804,12 +804,12 @@
 	if ($reply=~/^error\:(.*)/) {
 	    $message.="<font color=red>Write Error: $1</font>";
 	}
+# ---------------------------------------------------------------- Done storing
+    }
 # --------------------------------------------- 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
     %courseopt = &Apache::lonnet::dump
         ('resourcedata',