From 825499978c03b0edd720d65cfdb6346472e2445b Mon Sep 17 00:00:00 2001
From: Sergey <banzaj28@yandex.ru>
Date: Thu, 28 Nov 2019 16:13:11 +0300
Subject: [PATCH] =?UTF-8?q?=D0=98=D1=81=D0=BF=D1=80=D0=B0=D0=B2=D0=BB?=
 =?UTF-8?q?=D0=B5=D0=BD=D0=B0=20=D0=BE=D1=88=D0=B8=D0=B1=D0=BA=D0=B0=20?=
 =?UTF-8?q?=D1=81=20=D0=BF=D0=B5=D1=80=D0=B5=D0=BC=D0=B5=D0=BD=D0=BD=D1=8B?=
 =?UTF-8?q?=D0=BC=D0=B8=20infobase=5Fuser=20infobase=5Fpwd=20ib=5Fauth=20?=
 =?UTF-8?q?=D0=BF=D1=80=D0=B8=20=D1=80=D0=B5=D0=B4=D0=B0=D0=BA=D1=82=D0=B8?=
 =?UTF-8?q?=D1=80=D0=BE=D0=B2=D0=B0=D0=BD=D0=B8=D0=B8=20=D0=98=D0=91?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 lib/function.tcl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/function.tcl b/lib/function.tcl
index 6b1430d..53a969a 100644
--- a/lib/function.tcl
+++ b/lib/function.tcl
@@ -1939,7 +1939,7 @@ proc Edit::infobases {tree host values} {
 proc Edit::infobase {tree host values} {
     global default active_cluster infobase agent_user agent_pwd cluster_user cluster_pwd
     global security_level dbms scheduled_jobs_deny license_distribution date_offset
-    global sessions_deny auth
+    global sessions_deny auth infobase_user infobase_pwd ib_auth
     if {$cluster_user ne "" && $cluster_pwd ne ""} {
         set auth "--cluster-user=$cluster_user --cluster-pwd=$cluster_pwd"
     } else {
@@ -2581,3 +2581,4 @@ proc Del::inet {tree host profile_name} {
 }
 
 
+