From 818973e54ab0b163e4950dbf35eb09ef51a1806e Mon Sep 17 00:00:00 2001
From: Sergey <banzaj28@yandex.ru>
Date: Sat, 24 Aug 2019 15:39:00 +0300
Subject: [PATCH] =?UTF-8?q?=D0=A3=D0=B4=D0=B0=D0=BB=D0=B5=D0=BD=D1=8B=20?=
 =?UTF-8?q?=D0=B7=D0=B0=D0=B2=D0=B8=D1=81=D0=B8=D0=BC=D0=BE=D1=81=D1=82?=
 =?UTF-8?q?=D0=B8=20=D0=BD=D0=B0=20json.=20=D0=9A=D0=BE=D0=BD=D1=84=D0=B8?=
 =?UTF-8?q?=D0=B3=20=D0=B1=D1=83=D0=B4=D0=B5=D1=82=20=D0=B2=D0=B2=D0=B8?=
 =?UTF-8?q?=D0=B4=D0=B5=20tcl-=D1=81=D0=BB=D0=BE=D0=B2=D0=B0=D1=80=D1=8F?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 rac_gui.tcl | 5 -----
 1 file changed, 5 deletions(-)

diff --git a/rac_gui.tcl b/rac_gui.tcl
index aa5dec9..c65e7fc 100755
--- a/rac_gui.tcl
+++ b/rac_gui.tcl
@@ -16,8 +16,6 @@ exec wish "$0" -- "$@"
 ######################################################
 
 package require msgcat
-package require json
-package require json::write
 
 # Устанавливаем текущий каталог
 set dir(root) [pwd]
@@ -101,6 +99,3 @@ if [file exists [file join $dir(work) 1c_srv.cfg]] {
         dict set servers_list $host clusters {}
     }    
 }
-
-CreateInfoBasesJSONfile $servers_list
-