From 76b23ebfd5384033ecefd8bed4babfeb12d103e9 Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Sun, 29 Sep 2002 17:53:40 +0000
Subject: [PATCH] increase LRU cache sizes

---
 perl/DXUser.pm | 2 +-
 perl/Prefix.pm | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/perl/DXUser.pm b/perl/DXUser.pm
index 80a9b641..6b85afb3 100644
--- a/perl/DXUser.pm
+++ b/perl/DXUser.pm
@@ -32,7 +32,7 @@ $dbm = undef;
 $filename = undef;
 $lastoperinterval = 60*24*60*60;
 $lasttime = 0;
-$lrusize = 500;
+$lrusize = 2000;
 
 # hash of valid elements and a simple prompt
 %valid = (
diff --git a/perl/Prefix.pm b/perl/Prefix.pm
index a07ebdbd..10559711 100644
--- a/perl/Prefix.pm
+++ b/perl/Prefix.pm
@@ -30,7 +30,7 @@ $db = undef;					# the DB_File handle
 %prefix_loc = ();				# the meat of the info
 %pre = ();						# the prefix list
 $hits = $misses = $matchtotal = 1;		# cache stats
-$lrusize = 1000;				# size of prefix LRU cache
+$lrusize = 2000;				# size of prefix LRU cache
 
 $lru = LRU->newbase('Prefix', $lrusize);
 
-- 
2.34.1