[svn:parrot] r43599 - trunk/tools/dev
cotto at svn.parrot.org
cotto at svn.parrot.org
Tue Jan 26 09:10:50 UTC 2010
Author: cotto
Date: Tue Jan 26 09:10:50 2010
New Revision: 43599
URL: https://trac.parrot.org/parrot/changeset/43599
Log:
[checkdepends] minor readability improvements
Modified:
trunk/tools/dev/checkdepend.pl
Modified: trunk/tools/dev/checkdepend.pl
==============================================================================
--- trunk/tools/dev/checkdepend.pl Tue Jan 26 09:09:03 2010 (r43598)
+++ trunk/tools/dev/checkdepend.pl Tue Jan 26 09:10:50 2010 (r43599)
@@ -74,14 +74,14 @@
foreach my $include (@includes) {
# same dir as file?
my $file_dir = (File::Spec->splitpath($file))[1];
- my $make_dep = collapse_path(File::Spec->catfile($file_dir,$include));
+ my $make_dep = collapse_path(File::Spec->catfile($file_dir, $include));
if (defined($make_dep) && -f $make_dep) {
push @{$deps{$file}}, $make_dep;
next;
}
# global 'include' dir?
- $make_dep = collapse_path(File::Spec->catfile('include',$include));
+ $make_dep = collapse_path(File::Spec->catfile('include', $include));
if (defined($make_dep) && -f $make_dep) {
push @{$deps{$file}}, $make_dep;
next;
@@ -120,19 +120,19 @@
foreach my $include (@includes) {
# same dir as file?
my $file_dir = (File::Spec->splitpath($file))[1];
- my $make_dep = collapse_path(File::Spec->catfile($file_dir,$include));
+ my $make_dep = collapse_path(File::Spec->catfile($file_dir, $include));
if (defined($make_dep) && -f $make_dep) {
push @{$deps{$file}}, $make_dep;
next;
}
# global 'runtime' dir?
- $make_dep = collapse_path(File::Spec->catfile('runtime/parrot/include',$include));
+ $make_dep = collapse_path(File::Spec->catfile('runtime/parrot/include', $include));
if (defined($make_dep) && -f $make_dep) {
push @{$deps{$file}}, $make_dep;
next;
}
- $make_dep = collapse_path(File::Spec->catfile('runtime/parrot/library',$include));
+ $make_dep = collapse_path(File::Spec->catfile('runtime/parrot/library', $include));
if (defined($make_dep) && -f $make_dep) {
push @{$deps{$file}}, $make_dep;
next;
More information about the parrot-commits
mailing list