projects
/
egate.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
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>
{
<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
if {[info commands saveState] == ""} {
source z39util.tcl
@@
-22,7
+22,7
@@
html "using host " $hist($setNo,host) " <br\n"
incr nextSetNo
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
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]
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)} {
incr setOffset
set setMax [z39.$setNo resultCount]
if {$setMax > $hist($setNo,maxPresent)} {