diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2012-05-19 13:28:47 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2012-05-21 18:09:35 -0700 |
| commit | 341b41588d2e6ed24bea94e6437ce222a0981ea7 (patch) | |
| tree | dabe7bec543d7518ef8b41b03e29d6ac33f8b5ee /lib/overload.t | |
| parent | fdd52a68b921c0fc49068fee9e70ec281c81146f (diff) | |
| download | perl-341b41588d2e6ed24bea94e6437ce222a0981ea7.tar.gz | |
overload.t: Translate a comment into English :-)
Added by 0bdaccee3 and partly corrected by b0bf6df7d, this comment had
me befuddled enough to have to read it three times.
Diffstat (limited to 'lib/overload.t')
| -rw-r--r-- | lib/overload.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/overload.t b/lib/overload.t index a3a818cf62..2b07263e3c 100644 --- a/lib/overload.t +++ b/lib/overload.t @@ -1151,8 +1151,8 @@ like ($@, qr/zap/); sub numify { ${$_[0]} } } -# These are all check that overloaded values rather than reference addresses -# are what is getting tested. +# These all check that overloaded values, rather than reference addresses, +# are what are getting tested. my ($two, $one, $un, $deux) = map {new Numify $_} 2, 1, 1, 2; my ($ein, $zwei) = (1, 2); |