From b72d82dc1770487df30e3939e26d423334f3f6aa Mon Sep 17 00:00:00 2001 From: Karl Williamson Date: Tue, 18 Mar 2014 10:39:53 -0600 Subject: [PATCH] mktables: Fix overlooked in-line table defns code Commit eb0925341cc65ce6ce57503ec0ab97cdad39dc98 introduced the idea of a pseudo-directory as a way to store table definitions in-line in Heavy.pl, but conform to the expectations of the code in regard to objects being files within directories. This kept the needed changes to a minimum. The code changed by the current commit was overlooked then as something that also needed to change, because there are no current instances of it needing to. But this could change with future Unicode versions, or as in the next few commits, in extending the in-line definitions. --- lib/unicore/mktables | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/lib/unicore/mktables b/lib/unicore/mktables index d92c69d..1e84e10 100644 --- a/lib/unicore/mktables +++ b/lib/unicore/mktables @@ -16321,7 +16321,13 @@ sub make_Heavy () { # for the alternate table figured out at that time. foreach my $cased (keys %caseless_equivalent_to) { my @path = $caseless_equivalent_to{$cased}->file_path; - my $path = join '/', @path[1, -1]; + my $path; + if ($path[0] eq "#") { # Pseudo-directory '#' + $path = join '/', @path; + } + else { # Gets rid of lib/ + $path = join '/', @path[1, -1]; + } $caseless_equivalent_to{$cased} = $path; } my $caseless_equivalent_to -- 2.7.4