From db453a537bc978b0e47c8a94321b72c363c34c91 Mon Sep 17 00:00:00 2001
From: Sergey Kalinin <banzaj28@yandex.ru>
Date: Tue, 3 Jul 2018 14:04:54 +0300
Subject: [PATCH] =?UTF-8?q?=D0=94=D0=BE=D0=B1=D0=B0=D0=B2=D0=BB=D0=B5?=
=?UTF-8?q?=D0=BD=D1=8B=20=D0=BA=D0=B0=D0=B2=D1=8B=D1=87=D0=BA=D0=B8=20?=
=?UTF-8?q?=D0=B2=20Run::acl=20=D0=B4=D0=BB=D1=8F=20=D0=BF=D0=B0=D1=80?=
=?UTF-8?q?=D0=B0=D0=BC=D0=B5=D1=82=D1=80=D0=BE=D0=B2=20=D1=81=D0=BE=D0=B4?=
=?UTF-8?q?=D0=B5=D1=80=D0=B6=D0=B0=D1=89=D0=B8=D1=85=20=D0=BF=D1=80=D0=BE?=
=?UTF-8?q?=D0=B1=D0=B5=D0=BB=D1=8B?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
---
lib/function.tcl | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/lib/function.tcl b/lib/function.tcl
index e59bcfe..45c4fd2 100644
--- a/lib/function.tcl
+++ b/lib/function.tcl
@@ -1907,9 +1907,9 @@ proc Del::acl {host type name profile_name} {
set agent_auth ""
}
if {$type eq "directory"} {
- set item "--alias=$name"
+ set item "--alias=\"$name\""
} else {
- set item "--name=$name"
+ set item "--name=\"$name\""
}
set answer [tk_messageBox -message "Удалить $type - $name?" \
-icon question -type yesno ]
@@ -1942,3 +1942,4 @@ proc Del::app {tree host profile_name} {
proc Del::inet {tree host profile_name} {
Del::acl $host inet [GetWorkTreeItems "name"] $profile_name
}
+