urosm
/
ikiwiki
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

po: fix some uninitalized value warnings when used by websetup

master
Joey Hess 2010-04-24 16:44:45 -04:00
parent e90d67d3c9
commit cce3042457
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
IkiWiki/Plugin/po.pm
View File

@ -567,7 +567,7 @@ sub mybestlink ($$) {
my $link=shift; my $link=shift;
return $origsubs{'bestlink'}->($page, $link) return $origsubs{'bestlink'}->($page, $link)
if $config{po_link_to} eq "default"; if defined $config{po_link_to} && $config{po_link_to} eq "default";
my $res=$origsubs{'bestlink'}->(masterpage($page), $link); my $res=$origsubs{'bestlink'}->(masterpage($page), $link);
my @caller = caller(1); my @caller = caller(1);
@ -585,7 +585,7 @@ sub mybeautify_urlpath ($) {
my $url=shift; my $url=shift;
my $res=$origsubs{'beautify_urlpath'}->($url); my $res=$origsubs{'beautify_urlpath'}->($url);
if ($config{po_link_to} eq "negotiated") { if (defined $config{po_link_to} && $config{po_link_to} eq "negotiated") {
$res =~ s!/\Qindex.$config{po_master_language}{code}.$config{htmlext}\E$!/!; $res =~ s!/\Qindex.$config{po_master_language}{code}.$config{htmlext}\E$!/!;
$res =~ s!/\Qindex.$config{htmlext}\E$!/!; $res =~ s!/\Qindex.$config{htmlext}\E$!/!;
map { map {
@ -729,6 +729,7 @@ sub istranslatablefile ($) {
my $type=pagetype($file); my $type=pagetype($file);
return 0 if ! defined $type || $type eq 'po'; return 0 if ! defined $type || $type eq 'po';
return 0 if $file =~ /\.pot$/; return 0 if $file =~ /\.pot$/;
return 0 if ! defined $config{po_translatable_pages};
return 1 if pagespec_match(pagename($file), $config{po_translatable_pages}); return 1 if pagespec_match(pagename($file), $config{po_translatable_pages});
return; return;
} }