--- loncom/lonnet/perl/lonnet.pm 2003/07/06 10:30:21 1.388 +++ loncom/lonnet/perl/lonnet.pm 2003/07/09 06:20:42 1.389 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.388 2003/07/06 10:30:21 www Exp $ +# $Id: lonnet.pm,v 1.389 2003/07/09 06:20:42 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -3204,7 +3204,7 @@ sub clear_EXT_cache_status { sub EXT_cache_status { my ($target_domain,$target_user) = @_; my $cachename = 'cache.EXT.'.$target_user.'.'.$target_domain; - if (exists($ENV{$cachename}) && ($ENV{$cachename}+1800) > time) { + if (exists($ENV{$cachename}) && ($ENV{$cachename}+600) > time) { # We know already the user has no data return 1; } else {