diff options
Diffstat (limited to 'IkiWiki.pm')
| -rw-r--r-- | IkiWiki.pm | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/IkiWiki.pm b/IkiWiki.pm index 41276e118..43ef67e8c 100644 --- a/IkiWiki.pm +++ b/IkiWiki.pm @@ -816,13 +816,15 @@ sub file_pruned ($$) { #{{{ $file =~ m/$regexp/; } #}}} +my $gettext_obj; sub gettext { #{{{ # Only use gettext in the rare cases it's needed. - # This overrides future calls of this function. if (exists $ENV{LANG} || exists $ENV{LC_ALL} || exists $ENV{LC_MESSAGES}) { - eval q{use Locale::gettext}; - textdomain('ikiwiki'); - return Locale::gettext::gettext(shift); + if (! $gettext_obj) { + eval q{use Locale::gettext ''}; + $gettext_obj=Locale::gettext->domain('ikiwiki'); + } + return $gettext_obj->get(shift); } else { return shift; |