X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=www%2Fmsearch.egw;h=5544a3c2080592314d58760e3b9b3188a629261d;hb=8bafbc608e1ffba9ee87f4856e586dffa57901b8;hp=6959878e51b6e3cb4b972a85471a50207a901179;hpb=a4571caef991e968e3c20b515490b7923306a1cf;p=egate.git diff --git a/www/msearch.egw b/www/msearch.egw index 6959878..5544a3c 100644 --- a/www/msearch.egw +++ b/www/msearch.egw @@ -1,9 +1,13 @@ { -# $Id: msearch.egw,v 1.19 1996/03/12 16:30:26 adam Exp $ +# $Id: msearch.egw,v 1.21 1996/03/14 11:50:45 adam Exp $ if {[info commands saveState] == ""} { source z39util.tcl + if {![info exists debug]} { + session-lost + egw_abort + } } global sessionWait global nextSetNo @@ -45,6 +49,8 @@ set hist($setNo,$i,query) [build-query $hist($setNo,$i,host) 3] } + set hist($setNo,scan) 0 + set hist($setNo,form,menu1) [egw_form menu1] set hist($setNo,form,menu2) [egw_form menu2] set hist($setNo,form,menu3) [egw_form menu3] @@ -73,8 +79,9 @@ set useIcons 1 button-main - button-new-query 1 $setNo - button-new-target 0 + button-new-query $setNo + button-view-history + button-new-target html "
\n" z39msearch $setNo B 1 $hist($setNo,maxPresent) 1 @@ -83,8 +90,9 @@ set useIcons 0 button-main - button-new-query 1 $setNo - button-new-target 0 + button-new-query $setNo + button-view-history + button-new-target } {