X-Git-Url: http://jsfdemo.indexdata.com/?a=blobdiff_plain;f=www%2Fmsearch.egw;h=01fa9aba0de372c6748b8444e42cc4fed71cf5b6;hb=71ad5b6272d0bc6320bea6c1ec10f5e10bbfe8ef;hp=4ac4f3a72b9be40a1c1f0baccc1d5128d5d91031;hpb=09f416a26c1c7e35ead317106f985774ec0c97bd;p=egate.git diff --git a/www/msearch.egw b/www/msearch.egw index 4ac4f3a..01fa9ab 100644 --- a/www/msearch.egw +++ b/www/msearch.egw @@ -1,6 +1,6 @@ { -# $Id: msearch.egw,v 1.6 1995/12/21 15:49:51 adam Exp $ +# $Id: msearch.egw,v 1.10 1996/01/08 08:42:13 adam Exp $ if {[info commands saveState] == ""} { source z39util.tcl @@ -27,7 +27,7 @@ incr nextSetNo for {set i 1} {$i <= $hist($setNo,0,host)} {incr i} { - set hist($setNo,$i,query) [build-query $hist($setNo,$i,host)] 3 + set hist($setNo,$i,query) [build-query $hist($setNo,$i,host) 3] } set hist($setNo,maxPresent) [wform hits] if {$hist($setNo,maxPresent) == ""} { @@ -50,9 +50,10 @@ html "Error\n
NSD$code: $msg: $addinfo" } else { set r [z39$i.$setNo resultCount] - html "$r hits\n
\n" + html "$r hits\n
\n" } html "\n" } @@ -73,7 +74,7 @@ html {"> New target } " | \n" } html {} } else { @@ -82,6 +83,7 @@ } { + if {!$debug} return html "
\n" html "

Debug information

\n" html "sessionId: $sessionId
\n"