po(mybestlink): fixed when fed with path beginning with /

[ikiwiki.git] / IkiWiki / Plugin / po.pm

diff --git a/IkiWiki/Plugin/po.pm b/IkiWiki/Plugin/po.pm
index 492b05c47ddb3dbbe297b8988f1205648e184c65..03ee9c33c15ab80fa1946ca17d0c902e33acbd8c 100644 (file)
--- a/IkiWiki/Plugin/po.pm
+++ b/IkiWiki/Plugin/po.pm
@@ -390,10 +390,12 @@ sub mybestlink ($$) { #{{{
        my $page=shift;
        my $link=shift;
 
-       my $res=$origsubs{'bestlink'}->($page, $link);
+       my $res=$origsubs{'bestlink'}->(masterpage($page), $link);
+       my $normres=$res;
+       $normres=~s#^/##;
        if (length $res
            && ($config{po_link_to} eq "current" || $config{po_link_to} eq "negotiated")
-           && istranslatable($res)
+           && istranslatable($normres)
            && istranslation($page)) {
                return $res . "." . lang($page);
        }