From: Adam Dickmeiss Date: Fri, 11 Oct 1996 13:16:34 +0000 (+0000) Subject: Bug fix: Sometimes the databaseNames were duplicated. X-Git-Url: http://sru.miketaylor.org.uk/?a=commitdiff_plain;h=31fe48365bb01d1b4e9683cb074a7303d1f10d40;p=egate.git Bug fix: Sometimes the databaseNames were duplicated. --- diff --git a/www/mquery.egw b/www/mquery.egw index b694786..849afba 100644 --- a/www/mquery.egw +++ b/www/mquery.egw @@ -1,6 +1,6 @@ { -# $Id: mquery.egw,v 1.16 1996/03/14 11:50:45 adam Exp $ +# $Id: mquery.egw,v 1.17 1996/10/11 13:16:34 adam Exp $ if {[info commands saveState] == ""} { source z39util.tcl @@ -37,6 +37,7 @@ if {$host != $phost} { set phost $host incr i + catch {unset hist($setNo,$i,database)} set hist($setNo,$i,host) $host set hist($setNo,$i,idAuthentication) [lindex $targets($host) 3] }