X-Git-Url: http://jsfdemo.indexdata.com/?a=blobdiff_plain;f=www%2Fmsearch.egw;h=c1c825a95bd71a97d09b571e8b1d3e470458972f;hb=3d4b6045b8875099666b99edbf1457c91b5da928;hp=7f41697c9863731c3580e709bab278abca43644f;hpb=b443634fbd412cea15ea527188c3e241bb1edf21;p=egate.git
diff --git a/www/msearch.egw b/www/msearch.egw
index 7f41697..c1c825a 100644
--- a/www/msearch.egw
+++ b/www/msearch.egw
@@ -1,6 +1,6 @@
{
-# $Id: msearch.egw,v 1.2 1995/11/08 16:14:33 adam Exp $
+# $Id: msearch.egw,v 1.3 1995/11/08 18:07:22 adam Exp $
if {[info commands saveState] == ""} {
source z39util.tcl
@@ -11,6 +11,8 @@
global hist
global zstatus
+ html " WWW/Z39.50 Gateway Search \n"
+ html "\n"
if {[wform menu1] == ""} {
set setNo [lindex $sessionParms 0]
} else {
@@ -32,9 +34,6 @@
set hist($setNo,maxPresent) 30
}
}
- html " WWW/Z39.50 Gateway Search \n"
- html "\n"
-
z39msearch $setNo 1
html "\n"
@@ -79,7 +78,8 @@
}
html "form: " [wform] "
\n"
html "target: " $host "
\n"
- html "query: --" $hist($setNo,1,query) "--
"
+ html "query: --" $hist($setNo,1,query) "--
\n"
+ html "database: " $hist($setNo,1,database) "
\n"
html "setNo: " $setNo "
\n"
html "nextSetNo: " $nextSetNo "
\n"
}