svk/rac-gui
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Исправлена ошибка при удалении элементов профиля безопасности

Browse Source
This commit is contained in:
Sergey Kalinin 2018-07-20 07:07:56 +03:00
parent a0bbbd3eb5
commit 3acd2be5a6
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lib/function.tcl
View File

@ -2207,10 +2207,12 @@ proc Del::acl {host type name profile_name} {
set agent_auth "" set agent_auth ""
} }
if {$type eq "directory"} { if {$type eq "directory"} {
set item "--alias=\"$name\"" set item "\"--alias=$name\""
} else { } else {
set item "--name=\"$name\"" set item "\"--name=$name\""
} }
set item [regsub -all -- " " $item "\\ "]
set answer [tk_messageBox -message "Удалить $type - $name?" \ set answer [tk_messageBox -message "Удалить $type - $name?" \
-icon question -type yesno ] -icon question -type yesno ]
switch -- $answer { switch -- $answer {