diff options
author | Joey Hess <joey@gnu.kitenet.net> | 2009-11-19 14:54:23 -0500 |
---|---|---|
committer | Joey Hess <joey@gnu.kitenet.net> | 2009-11-19 14:54:23 -0500 |
commit | 8ceb2df1b9e3368e765076b23ee0ecd4a2532a46 (patch) | |
tree | 00b5e3faf78158e186798f383a1d023b0906021d /Debian/Debhelper/Buildsystem.pm | |
parent | 25d57ca95f7571e13dbba4a0ae82c43d5e0e5a06 (diff) |
use foreach instead of for when looping thru array
Diffstat (limited to 'Debian/Debhelper/Buildsystem.pm')
-rw-r--r-- | Debian/Debhelper/Buildsystem.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Debian/Debhelper/Buildsystem.pm b/Debian/Debhelper/Buildsystem.pm index 5b3423e6..f729c0da 100644 --- a/Debian/Debhelper/Buildsystem.pm +++ b/Debian/Debhelper/Buildsystem.pm @@ -169,7 +169,7 @@ sub canonpath { my ($this, $path)=@_; my @canon; my $back=0; - for my $comp (split(m%/+%, $path)) { + foreach my $comp (split(m%/+%, $path)) { if ($comp eq '.') { next; } |