my $page = $params{page};
my $destpage = $params{destpage};
my $content = $params{content};
+ my $fullpage = $params{fullpage};
- my @caller = caller(4);
- # FIXME: need to whitelist inline as well?
- unless ($caller[3] eq "IkiWiki::render" ||
- $caller[3] eq 'IkiWiki::Plugin::sidebar::sidebar_content') {
+ unless ($fullpage) {
return $content;
}
my %ret;
map {
$ret{$_} = otherlanguage_page($page, $_)
- } otherlanguages_codes($page);
+ } @{otherlanguages_codes($page)};
return \%ret;
}
}
}
+sub match_needstranslation ($$;@) {
+ my $page=shift;
+
+ my $percenttranslated=IkiWiki::Plugin::po::percenttranslated($page);
+ if ($percenttranslated eq 'N/A') {
+ return IkiWiki::FailReason->new("file is not a translatable page");
+ }
+ elsif ($percenttranslated < 100) {
+ return IkiWiki::SuccessReason->new("file has $percenttranslated translated");
+ }
+ else {
+ return IkiWiki::FailReason->new("file is fully translated");
+ }
+}
+
1