X-Git-Url: http://jsfdemo.indexdata.com/?a=blobdiff_plain;f=www%2Fsearch.egw;h=daaf3b7fb70e32b74e0b4e700bfb6bb58e4fdeb5;hb=6ceeaa167e3ef2970b6ef0ce2b6c7d9c362eda0a;hp=7c0b84e5346b81d5f6ddaec5836a0a355a5b9c3c;hpb=c1c09b4242df9a16cd11477deea2e35f8ff57fec;p=egate.git
diff --git a/www/search.egw b/www/search.egw
index 7c0b84e..daaf3b7 100644
--- a/www/search.egw
+++ b/www/search.egw
@@ -1,44 +1,291 @@
{
-# $Id: search.egw,v 1.2 1995/10/27 17:30:16 adam Exp $
+# $Id: search.egw,v 1.22 1996/01/03 08:59:43 adam Exp $
-proc search-response {} {
+proc start-scan {scanNo cache dir} {
+ global sessionId
+ global sessionParms
global sessionWait
- set sessionWait 0
+ global setNo
+ global hist
+ global targets
+ global nextSetNo
+ global env
- htmlr "search response
"
- set r [z39.1 resultCount]
- htmlr "$r hits
"
- htmlr "