Skip to content

Commit

Permalink
perltidy
Browse files Browse the repository at this point in the history
  • Loading branch information
justone committed May 13, 2012
1 parent 12baf24 commit 0134698
Showing 1 changed file with 4 additions and 3 deletions.
7 changes: 4 additions & 3 deletions bin/dfm
Expand Up @@ -233,7 +233,7 @@ sub install_files {
chdir($target_dir);

# build up skip list
my $skip_files = { map { $_ => 1 } @$initial_skips };
my $skip_files = { map { $_ => 1 } @$initial_skips };
my $recurse_files = [];
my $execute_files = [];

Expand Down Expand Up @@ -330,11 +330,12 @@ sub install_files {
);
}
}

foreach my $execute (@$execute_files) {
if ( -x "$source_dir/$execute" ) {
system("$source_dir/$execute");
}elsif( -O "$source_dir/$execute" ){
}
elsif ( -O "$source_dir/$execute" ) {
system("chmod +x $source_dir/$execute");
system("$source_dir/$execute");
}
Expand Down

0 comments on commit 0134698

Please sign in to comment.