diff options
author | Karl Williamson <public@khwilliamson.com> | 2011-03-01 07:56:52 -0700 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2011-03-01 09:24:28 -0700 |
commit | b4067008f123b7492f82d744c12ca27964658096 (patch) | |
tree | e3fdcfad5128c423e68c11b3296865e89323f147 | |
parent | 98025745287774eee2205646801176660f6268b6 (diff) | |
download | perl-b4067008f123b7492f82d744c12ca27964658096.tar.gz |
Revert "mktables: Default map tables to range size 1."
This reverts commit cef6a343d5e19fe2dc2c3655ecf621c8ff26f252.
This commit had the unintended consequence of greatly increasing
the disk space used; the code in UCD.pm that didn't like ranges has now
been changed to accept them. The tables that the swashes currently
read already had been set to not put out ranges. If other tables
eventually do get read by swashes, things will have to be resolved at
that time.
-rw-r--r-- | lib/unicore/mktables | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/lib/unicore/mktables b/lib/unicore/mktables index f782a16b27..e3fa1ab3a8 100644 --- a/lib/unicore/mktables +++ b/lib/unicore/mktables @@ -5393,9 +5393,6 @@ sub trace { return main::trace(@_); } my $default_map = delete $args{'Default_Map'}; my $property = delete $args{'_Property'}; my $full_name = delete $args{'Full_Name'}; - - # Default map tables to range size 1 - my $range_size_1 = delete $args{'Range_Size_1'} // 1; # Rest of parameters passed on my $range_list = Range_Map->new(Owner => $property); @@ -5406,7 +5403,6 @@ sub trace { return main::trace(@_); } Full_Name => $full_name, _Property => $property, _Range_List => $range_list, - Range_Size_1 => $range_size_1, %args); my $addr = do { no overloading; pack 'J', $self; }; |