po: better rootpage logic for inline's post form

Set rootpage to the non-l10n'd rootpage parameter if it is set,
else to the masterpage of the linking page.

Signed-off-by: intrigeri <intrigeri@boum.org>
master
intrigeri 2009-08-28 15:00:16 +02:00
parent 53dc18ec2b
commit e671e72053
1 changed files with 18 additions and 0 deletions

View File

@ -59,6 +59,8 @@ sub import {
inject(name => "IkiWiki::urlto", call => \&myurlto);
$origsubs{'cgiurl'}=\&IkiWiki::cgiurl;
inject(name => "IkiWiki::cgiurl", call => \&mycgiurl);
$origsubs{'rootpage'}=\&IkiWiki::rootpage;
inject(name => "IkiWiki::rootpage", call => \&myrootpage);
}
@ -649,6 +651,22 @@ sub mycgiurl (@) {
return $origsubs{'cgiurl'}->(%params);
}
sub myrootpage (@) {
my %params=@_;
my $rootpage;
if (exists $params{rootpage}) {
$rootpage=$origsubs{'bestlink'}->($params{page}, $params{rootpage});
if (!length $rootpage) {
$rootpage=$params{rootpage};
}
}
else {
$rootpage=masterpage($params{page});
}
return $rootpage;
}
# ,----
# | Blackboxes for private data
# `----