aboutsummaryrefslogtreecommitdiffstats
path: root/fork-distribution
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-12-04 22:50:23 +0000
committerThierry Vignaud <tv@mageia.org>2012-12-04 22:50:23 +0000
commit9383cc3e5ad09f424190ccba1181e519c850fbee (patch)
tree35dafdfe6f51579e44da1e75b9d705170584649c /fork-distribution
parent8d761ce86483312fd99ccf1e4b662b3fad990380 (diff)
downloadrelease-9383cc3e5ad09f424190ccba1181e519c850fbee.tar
release-9383cc3e5ad09f424190ccba1181e519c850fbee.tar.gz
release-9383cc3e5ad09f424190ccba1181e519c850fbee.tar.bz2
release-9383cc3e5ad09f424190ccba1181e519c850fbee.tar.xz
release-9383cc3e5ad09f424190ccba1181e519c850fbee.zip
perl_checker cleanups
Diffstat (limited to 'fork-distribution')
-rwxr-xr-xfork-distribution6
1 files changed, 3 insertions, 3 deletions
diff --git a/fork-distribution b/fork-distribution
index b91c8eb..2ea6bc0 100755
--- a/fork-distribution
+++ b/fork-distribution
@@ -12,7 +12,7 @@ use Cwd;
GetOptions(
) or pod2usage(1);
-my ($source,$dest) = @ARGV;
+my ($source, $dest) = @ARGV;
$dest or do {
warn "No dest given";
@@ -34,11 +34,11 @@ sub find_distrib {
while (my $subdir = readdir($handle)) {
$subdir eq '..' and next;
my $d = MDV::Distribconf->new("$topdir/$subdir");
- if ($d->load){
+ if ($d->load) {
push(@distpath, $subdir);
}
}
- closedir($handle)
+ closedir($handle);
} else {
die "Cannot open $topdir: $!";
}