diff options
| author | Karl Williamson <public@khwilliamson.com> | 2012-06-09 17:43:15 -0600 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2012-06-09 21:47:42 -0600 |
| commit | 60c78852fa38199cfe9ba0708d46213f909cb5e0 (patch) | |
| tree | 258e2cdbfd4192b270ed66c8648f3d7dc7be9fba /lib/Unicode | |
| parent | 7bef440cec6de046112398f991b1dd7d23689e23 (diff) | |
| download | perl-60c78852fa38199cfe9ba0708d46213f909cb5e0.tar.gz | |
Unicode::UCD: typo and incorrect recipe in pod
An extra word is removed, and the recipe should not eval lines with NaN
in them and expect the answer to be NaN
Diffstat (limited to 'lib/Unicode')
| -rw-r--r-- | lib/Unicode/UCD.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Unicode/UCD.pm b/lib/Unicode/UCD.pm index 7670e6b2ae..81d729e593 100644 --- a/lib/Unicode/UCD.pm +++ b/lib/Unicode/UCD.pm @@ -2606,7 +2606,7 @@ means that all the elements of the map array are either rational numbers or the string C<"NaN">, meaning "Not a Number". A rational number is either an integer, or two integers separated by a solidus (C<"/">). The second integer represents the denominator of the division implied by the solidus, and is -actually always positive, so it is guaranteed not to be 0 and to not to be +actually always positive, so it is guaranteed not to be 0 and to not be signed. When the element is a plain integer (without the solidus), it may need to be adjusted to get the correct value by adding the offset, just as other C<"a"> properties. No adjustment is needed for @@ -2618,7 +2618,7 @@ can use something like this: my ($invlist_ref, $invmap_ref, $format) = prop_invmap($property); if ($format && $format eq "ar") { - map { $_ = eval $_ } @$invmap_ref; + map { $_ = eval $_ if $_ ne 'NaN' } @$map_ref; } Here's some entries from the output of the property "Nv", which has format |