diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-11-15 12:37:11 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-11-15 12:37:11 +0000 |
| commit | 749daba8115512bb19567dc4404da035c583c7ab (patch) | |
| tree | c276380b7b91ed8f8f0cf0e8a9ea2cf3f817132d /MDK/Common/String.pm | |
| parent | 3e374c857eccccc6929f86daea3da51e3dd6f7f1 (diff) | |
| download | perl-MDK-Common-749daba8115512bb19567dc4404da035c583c7ab.tar perl-MDK-Common-749daba8115512bb19567dc4404da035c583c7ab.tar.gz perl-MDK-Common-749daba8115512bb19567dc4404da035c583c7ab.tar.bz2 perl-MDK-Common-749daba8115512bb19567dc4404da035c583c7ab.tar.xz perl-MDK-Common-749daba8115512bb19567dc4404da035c583c7ab.zip | |
make it perl_checker compliant
Diffstat (limited to 'MDK/Common/String.pm')
| -rw-r--r-- | MDK/Common/String.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/MDK/Common/String.pm b/MDK/Common/String.pm index b5a588c..bac5a24 100644 --- a/MDK/Common/String.pm +++ b/MDK/Common/String.pm @@ -82,7 +82,7 @@ sub bestMatchSentence { } $best = $count, $bestSentence = $_ if $count > $best; } - wantarray ? ($bestSentence, $best) : $bestSentence; + wantarray() ? ($bestSentence, $best) : $bestSentence; } @@ -149,7 +149,7 @@ sub warp_text { } push @l, "$beg$t"; } - wantarray ? @l : join("\n", @l); + wantarray() ? @l : join("\n", @l); } 1; |