diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-11-13 14:40:56 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-11-13 14:40:56 +0000 |
commit | 602848d7fba65f080b8a5a3f46b881b48320e4f5 (patch) | |
tree | 618368bc5473795b0616a0d46f21274744fe13ba /MDK/Common/Func.pm | |
parent | 3cfc42b677f1599e57e63ae189f5d39d1e5d8f5e (diff) | |
download | perl-MDK-Common-602848d7fba65f080b8a5a3f46b881b48320e4f5.tar perl-MDK-Common-602848d7fba65f080b8a5a3f46b881b48320e4f5.tar.gz perl-MDK-Common-602848d7fba65f080b8a5a3f46b881b48320e4f5.tar.bz2 perl-MDK-Common-602848d7fba65f080b8a5a3f46b881b48320e4f5.tar.xz perl-MDK-Common-602848d7fba65f080b8a5a3f46b881b48320e4f5.zip |
add/remove spaces to make perl_checker happy
Diffstat (limited to 'MDK/Common/Func.pm')
-rw-r--r-- | MDK/Common/Func.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/MDK/Common/Func.pm b/MDK/Common/Func.pm index 56e032a..b655ec8 100644 --- a/MDK/Common/Func.pm +++ b/MDK/Common/Func.pm @@ -173,7 +173,7 @@ sub fold_left(&@) { my ($f, $initial, @l) = @_; local ($::a, $::b); $::a = $initial; - foreach $::b (@l) { $::a = &$f() } + foreach (@l) { $::b = $_; $::a = &$f() } $::a } |