fix patch to not strip a leading "." unless it's part of a path

[git.ikiwiki.info.git] / po / po2wiki

diff --git a/po/po2wiki b/po/po2wiki
index 6b84f7d54dc183c647f3458aa483802b264e2895..126aa8e17d0949d0c9a55477268464936092ff33 100755 (executable)
--- a/po/po2wiki
+++ b/po/po2wiki
@@ -22,7 +22,8 @@ foreach my $file (@$files) {
        $pagesources{$page}=$file; # used by po plugin functions
 }
 
        $pagesources{$page}=$file; # used by po plugin functions
 }
 

-foreach my $ll (keys %{$config{po_slave_languages}}) {
+foreach my $lang (@{$config{po_slave_languages}}) {
+       my ($ll, $name)=IkiWiki::Plugin::po::splitlangpair($lang);

        $config{destdir}="../underlays/locale/$ll";
 
        foreach my $file (@$files) {
        $config{destdir}="../underlays/locale/$ll";
 
        foreach my $file (@$files) {