X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=www%2Fquery.egw;h=cd40d6933fd41687aa48842caeae5899a22ab773;hb=7f332a840baf336e34d612cdee0ef27901f0dd11;hp=74ad296851e55ec8458970dee32f9af055eedf9c;hpb=8bafbc608e1ffba9ee87f4856e586dffa57901b8;p=egate.git diff --git a/www/query.egw b/www/query.egw index 74ad296..cd40d69 100644 --- a/www/query.egw +++ b/www/query.egw @@ -1,6 +1,6 @@ { -# $Id: query.egw,v 1.39 1996/03/14 11:50:47 adam Exp $ +# $Id: query.egw,v 1.41 2001/02/26 14:32:36 adam Exp $ if {[info commands saveState] == ""} { source z39util.tcl @@ -98,6 +98,7 @@ proc ok-response {} { set useIcons 1 button-main + button-feedback button-new-target if {[lsearch [z390 options] scan] >= 0} { button-scan-window $setNo @@ -117,7 +118,7 @@ proc ok-response {} { set databaseDefault $hist($oSetNo,0,database) } - html {
} \n set nodb [llength $databases] if {$nodb > 1} { @@ -208,6 +209,7 @@ proc ok-response {} { set useIcons 0 button-main + button-feedback button-new-target if {[lsearch [z390 options] scan] >= 0} { button-scan-window $setNo