--- loncom/interface/lonsearchcat.pm	2001/11/28 16:47:25	1.105
+++ loncom/interface/lonsearchcat.pm	2001/11/28 19:26:20	1.106
@@ -7,7 +7,7 @@
 # 3/20, 3/21, 3/22, 3/26, 3/27, 4/2, 8/15, 8/24, 8/25 Scott Harrison
 # 10/12,10/14,10/15,10/16,11/28 Scott Harrison
 #
-# $Id: lonsearchcat.pm,v 1.105 2001/11/28 16:47:25 harris41 Exp $
+# $Id: lonsearchcat.pm,v 1.106 2001/11/28 19:26:20 harris41 Exp $
 ###
 
 ###############################################################################
@@ -1074,7 +1074,12 @@ ENDPOP
 		      $r->rflush();
 		      $tflag=0;
 		  }
-		  last WLOOP if $temp>1;
+		  if ($temp>1) {
+		      sleep 1;
+		      $timeremain--;
+		      $elapsetime++;
+		      last WLOOP;
+		  }
 		  if (-e "$replyfile.end") {
 		      $bloop--;
 		      $orkey{$rkey}=1;