--- loncom/lonnet/perl/lonnet.pm	2006/10/04 19:52:08	1.782.2.3
+++ loncom/lonnet/perl/lonnet.pm	2006/10/20 20:39:44	1.782.2.4
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # TCP networking package
 #
-# $Id: lonnet.pm,v 1.782.2.3 2006/10/04 19:52:08 albertel Exp $
+# $Id: lonnet.pm,v 1.782.2.4 2006/10/20 20:39:44 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -7292,7 +7292,9 @@ sub get_iphost {
 
 }
 
-$memcache=new Cache::Memcached({'servers'=>['127.0.0.1:11211']});
+$memcache=new Cache::Memcached({'servers'           => ['127.0.0.1:11211'],
+				'compress_threshold'=> 20_000,
+ 			        });
 
 $processmarker='_'.time.'_'.$perlvar{'lonHostID'};
 $dumpcount=0;