fix targetpage replacement to support 3 argument form
Oddly, this hadn't caused any visible breakage. Possibly inline, which is the only thing to use targetpage, resolves the function to the "real" one before po gets loaded?master
parent
f39d02583a
commit
7821965ef0
|
@ -624,20 +624,24 @@ sub mybeautify_urlpath ($) {
|
|||
return $res;
|
||||
}
|
||||
|
||||
sub mytargetpage ($$) {
|
||||
sub mytargetpage ($$;$) {
|
||||
my $page=shift;
|
||||
my $ext=shift;
|
||||
my $filename=shift;
|
||||
|
||||
if (istranslation($page) || istranslatable($page)) {
|
||||
my ($masterpage, $lang) = (masterpage($page), lang($page));
|
||||
if (! $config{usedirs} || $masterpage eq 'index') {
|
||||
if (defined $filename) {
|
||||
return $masterpage . "/" . $filename . "." . $lang . "." . $ext;
|
||||
}
|
||||
elsif (! $config{usedirs} || $masterpage eq 'index') {
|
||||
return $masterpage . "." . $lang . "." . $ext;
|
||||
}
|
||||
else {
|
||||
return $masterpage . "/index." . $lang . "." . $ext;
|
||||
}
|
||||
}
|
||||
return $origsubs{'targetpage'}->($page, $ext);
|
||||
return $origsubs{'targetpage'}->($page, $ext, $filename);
|
||||
}
|
||||
|
||||
sub myurlto ($;$$) {
|
||||
|
|
Loading…
Reference in New Issue