More general multi-search algorithm with cached records.

[egate.git] / www / msearch.egw
diff --git a/www/msearch.egw b/www/msearch.egw

index 2ca5eb5..f6defa0 100644 (file)
--- a/www/msearch.egw
+++ b/www/msearch.egw
@@ -1,6 +1,6 @@
  <html>
  {
-# $Id: msearch.egw,v 1.13 1996/01/26 15:50:07 adam Exp $
+# $Id: msearch.egw,v 1.14 1996/01/29 17:31:47 adam Exp $
  
      if {[info commands saveState] == ""} {
          source z39util.tcl
@@ -32,7 +32,7 @@
          }
          set hist($setNo,maxPresent) [egw_form hits]
          if {$hist($setNo,maxPresent) == ""} {
-            set hist($setNo,maxPresent) 30
+            set hist($setNo,maxPresent) 20
          }
      }
  
@@ -42,7 +42,7 @@
      button-new-target 0
  
      html "<br>\n"
-    z39msearch $setNo 1 B
+    z39msearch $setNo B 1 $hist($setNo,maxPresent) 1
  
      html "<dl>\n"
      set not $hist($setNo,0,host)