diff options
Diffstat (limited to 'bin')
| -rwxr-xr-x | bin/drakguard | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/bin/drakguard b/bin/drakguard index 92bb3d6..ee35cd8 100755 --- a/bin/drakguard +++ b/bin/drakguard @@ -531,14 +531,12 @@ sub set_permissions { sub restore_permissions { my ($line) = @_; - foreach ($line) { - my ($fich, $usrname, $grpname, $mode) = /^(.*)\t(\w+)\.(\w+)\t(\d+)\s*/ or next; + my ($fich, $usrname, $grpname, $mode) = $line =~ /^(.*)\t(\w+)\.(\w+)\t(\d+)\s*/ or return; $mode = sprintf "%04d", $mode;#make number with 4 digits my $guid = getgrnam($grpname); my $uid = getpwnam($usrname); chown $uid, $guid, $fich; chmod oct($mode), $fich; - } } sub subst_config_line { |