projects / egate.git / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
Work on search in multiple targets.
[egate.git] / www / search.egw
diff --git a/www/search.egw b/www/search.egw
index 08e0aa1..76a4434 100644 (file)
--- a/www/search.egw
+++ b/www/search.egw
@@ -1,6 +1,6 @@
 <html>
 {
-# $Id: search.egw,v 1.8 1995/11/06 17:44:21 adam Exp $
+# $Id: search.egw,v 1.9 1995/11/07 14:56:59 adam Exp $
 
     if {[info commands saveState] == ""} {
         source z39util.tcl
@@ -22,7 +22,7 @@
         html "using host " $hist($setNo,host) " <br\n"
         incr nextSetNo
 
-        set hist($setNo,query) [build-query]
+        set hist($setNo,query) [build-query $hist($setNo,host)]
         set b [wform base]
         if {$b == ""} {
             set hist($setNo,database) $databases
@@ -52,7 +52,7 @@
         html "<h2> Search result $r hits</h2>\n"
         wflush
         set setOffset [z39.$setNo numberOfRecordsReturned]
-        display-rec 1 $setOffset display-brief
+        display-rec 1 $setOffset display-brief z39
         incr setOffset
         set setMax [z39.$setNo resultCount]
         if {$setMax > $hist($setNo,maxPresent)} {
Europgate