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

albertel lon-capa-cvs@mail.lon-capa.org
Thu, 14 Dec 2006 20:05:52 -0000


albertel		Thu Dec 14 15:05:52 2006 EDT

  Modified files:              
    /loncom/interface	lonparmset.pm 
  Log:
  - fix the caching logic so it's actually works
  
  
Index: loncom/interface/lonparmset.pm
diff -u loncom/interface/lonparmset.pm:1.352 loncom/interface/lonparmset.pm:1.353
--- loncom/interface/lonparmset.pm:1.352	Thu Dec 14 15:04:11 2006
+++ loncom/interface/lonparmset.pm	Thu Dec 14 15:05:52 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
-# $Id: lonparmset.pm,v 1.352 2006/12/14 20:04:11 albertel Exp $
+# $Id: lonparmset.pm,v 1.353 2006/12/14 20:05:52 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -273,9 +273,7 @@
 sub rulescache {
     my $id=shift;
     if ($rulesid ne $env{'request.course.id'}) {
-	%rules=();
-    }
-    unless (defined($rules{$id})) {
+	&& !defined($rules{$id})) {
 	my $dom = $env{'course.'.$env{'request.course.id'}.'.domain'};
 	my $crs = $env{'course.'.$env{'request.course.id'}.'.num'};
 	%rules=&Apache::lonnet::dump('parmdefactions',$dom,$crs);