po plugin: allow pagestate update (bugfix)
Signed-off-by: intrigeri <intrigeri@boum.org>master
parent
b0b87d1584
commit
ffd1fff775
|
@ -14,6 +14,7 @@ use File::Temp;
|
|||
sub import {
|
||||
hook(type => "getsetup", id => "po", call => \&getsetup);
|
||||
hook(type => "checkconfig", id => "po", call => \&checkconfig);
|
||||
hook(type => "needsbuild", id => "po", call => \&needsbuild);
|
||||
hook(type => "targetpage", id => "po", call => \&targetpage);
|
||||
hook(type => "tweakurlpath", id => "po", call => \&tweakurlpath);
|
||||
hook(type => "tweakbestlink", id => "po", call => \&tweakbestlink);
|
||||
|
@ -72,6 +73,22 @@ sub checkconfig () { #{{{
|
|||
}
|
||||
} #}}}
|
||||
|
||||
sub needsbuild (@) { #{{{
|
||||
my $needsbuild=shift;
|
||||
|
||||
foreach my $page (keys %pagestate) {
|
||||
if (exists $pagestate{$page}{po}{translatable}) {
|
||||
if (exists $pagesources{$page} &&
|
||||
grep { $_ eq $pagesources{$page} } @$needsbuild) {
|
||||
# remove state, it will be re-added
|
||||
# if the preprocessor directive is still
|
||||
# there during the rebuild
|
||||
delete $pagestate{$page}{po}{translatable};
|
||||
}
|
||||
}
|
||||
}
|
||||
} #}}}
|
||||
|
||||
sub targetpage (@) { #{{{
|
||||
my %params = @_;
|
||||
my $page=$params{page};
|
||||
|
|
Loading…
Reference in New Issue