--- loncom/lonnet/perl/lonnet.pm	2005/02/14 04:29:43	1.587.2.3.2.11
+++ loncom/lonnet/perl/lonnet.pm	2005/02/14 04:31:59	1.587.2.3.2.12
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # TCP networking package
 #
-# $Id: lonnet.pm,v 1.587.2.3.2.11 2005/02/14 04:29:43 albertel Exp $
+# $Id: lonnet.pm,v 1.587.2.3.2.12 2005/02/14 04:31:59 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -782,7 +782,7 @@ sub getsection {
     $courseid=~s/^(\w)/\/$1/;
 
     my $hashid="$udom:$unam:$courseid";
-    my ($result,$cached)=&is_cached_new('getsection',$hashid,1);
+    my ($result,$cached)=&is_cached_new('getsection',$hashid);
     if (defined($cached)) { return $result; }
 
     my %Pending; 
@@ -1023,7 +1023,7 @@ EVALBLOCK
 #    &logthis("load_cache_item $name took ".(&Time::HiRes::time()-$starttime));
 }
 
-my $to_remember=10;
+my $to_remember=20;
 my %remembered;
 my %accessed;
 my $kicks=0;