Incorporated WAIS functionality.

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

index f6defa0..a86d918 100644 (file)
--- a/www/msearch.egw
+++ b/www/msearch.egw
@@ -1,6 +1,6 @@
  <html>
  {
-# $Id: msearch.egw,v 1.14 1996/01/29 17:31:47 adam Exp $
+# $Id: msearch.egw,v 1.15 1996/02/29 15:41:38 adam Exp $
  
      if {[info commands saveState] == ""} {
          source z39util.tcl
@@ -60,7 +60,11 @@
              set r [z39$i.$setNo resultCount]
              html "$r hits</h3>\n<dd>\n<ul>\n"
  
-            display-rec 1 $hist($setNo,$i,offset) display-brief $i
+            if {$hist($setNo,$i,offset) > $hist($setNo,maxPresent)} {
+                display-rec 1 $hist($setNo,maxPresent) display-brief $i
+            } else {
+                display-rec 1 $hist($setNo,$i,offset) display-brief $i
+            }
              html "</ul>"
          }
          html "\n"