X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=www%2Fsearch.egw;h=e526ebd9a65f9995a10f27bea193955875de1d88;hb=7f332a840baf336e34d612cdee0ef27901f0dd11;hp=738906bd5ea7c1762c8bd8154ed96cca339f0b4c;hpb=4938d0c2e8f4e1eec397c2bfbbc7e23fd150c369;p=egate.git diff --git a/www/search.egw b/www/search.egw index 738906b..e526ebd 100644 --- a/www/search.egw +++ b/www/search.egw @@ -1,6 +1,6 @@ { -# $Id: search.egw,v 1.34 1996/03/07 12:46:09 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 @@ -21,7 +21,7 @@ proc start-scan {scanNo targetNo cache dir initSet} { html "
\n" set useIcons 1 - button-europagate + button-main if {$dir == "b"} { set lines 20 @@ -35,34 +35,40 @@ 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 {