X-Git-Url: http://lists.indexdata.dk/cgi-bin?a=blobdiff_plain;f=www%2Fsearch.egw;h=e526ebd9a65f9995a10f27bea193955875de1d88;hb=7f332a840baf336e34d612cdee0ef27901f0dd11;hp=3e66629f0e042344031851c5ef9817206c1f3488;hpb=a4571caef991e968e3c20b515490b7923306a1cf;p=egate.git
diff --git a/www/search.egw b/www/search.egw
index 3e66629..e526ebd 100644
--- a/www/search.egw
+++ b/www/search.egw
@@ -1,6 +1,6 @@
{
-# $Id: search.egw,v 1.37 1996/03/12 16:30:28 adam Exp $
+# $Id: search.egw,v 1.41 2001/02/26 14:32:36 adam Exp $
proc start-scan {scanNo targetNo cache dir initSet} {
global sessionId
@@ -35,32 +35,38 @@ proc start-scan {scanNo targetNo cache dir initSet} {
}
if {$hist($setNo,$scanNo,scanTerm) != ""} {
if {[z39scan $setNo $scanNo 0 $lines $pos $cache] != "1"} {
- button-new-query 0 $setNo
+ button-new-query $setNo
egw_log debug "z39_scan failed"
return
}
- html {}
if {$useIcons} {
html {}
} else {
- html {Previous Terms | }
+ html {Previous Terms}
}
- html {}
if {$useIcons} {
html {
}
} else {
- html {Next Terms | }
+ html {Next Terms}
}
html {}
}
- button-new-query 0 $setNo
+ button-new-query $setNo
set databases [splitDatabaseSpec $host]
@@ -72,7 +78,7 @@ proc start-scan {scanNo targetNo cache dir initSet} {
set databaseDefault $hist($oSetNo,$targetNo,database)
}
- html {