mirrors/1c_rac-gui
1
0
Fork 0
mirror of https://bitbucket.org/svk28/rac-gui synced 2024-09-21 08:48:04 +00:00
Code Releases Activity

Добавлены кавычки в Run::acl для параметров содержащих пробелы

Browse Source
This commit is contained in:
Sergey Kalinin 2018-07-03 14:04:54 +03:00
parent d46f94660e
commit db453a537b
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lib/function.tcl
View File

@ -1907,9 +1907,9 @@ 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 answer [tk_messageBox -message "Удалить $type - $name?" \ set answer [tk_messageBox -message "Удалить $type - $name?" \
-icon question -type yesno ] -icon question -type yesno ]
@ -1942,3 +1942,4 @@ proc Del::app {tree host profile_name} {
proc Del::inet {tree host profile_name} { proc Del::inet {tree host profile_name} {
Del::acl $host inet [GetWorkTreeItems "name"] $profile_name Del::acl $host inet [GetWorkTreeItems "name"] $profile_name
} }