sub untranslated_keys
{
my ($from_parsed, $to_parsed) = @_;
- grep { not exists $to_parsed->{$_} or $from_parsed->{$_} eq $to_parsed->{$_} } keys %$from_parsed;
+ sort grep { not exists $to_parsed->{$_} or $from_parsed->{$_} eq $to_parsed->{$_} } keys %$from_parsed;
}
sub prune_untranslated_with_blacklist
my %bw_list = (%$default, %$this_language);
- use feature ':5.10';
- use Data::Dump 'dump';
- say STDERR dump \%bw_list;
-
while (my ($key, $blacklisted) = each %bw_list)
{
# FIXME: Does syck actually support true/false booleans in yaml?
html.dir: true
layouts.intro_3_bytemark: true
layouts.intro_3_ucl: true
+ layouts.project_name.h1: true
+ layouts.project_name.title: true
+ site.index.license.license_url: true
+ site.index.license.project_url: true
de:
layouts.export: true