X-Git-Url: https://git.deb.at/?a=blobdiff_plain;ds=sidebyside;f=lib%2FPackages%2FI18N%2FLocale.pm;h=8c274303374e34c90b6877eb563ba7d92ecd2a9a;hb=35396b36e9658cb7346fb080531fff92a6d0fd57;hp=94fd8990fdf8013f981e67b1b8ba437fec9e4bc2;hpb=1b69eafb0f33afa134e3a0c0c794c72cbaf37294;p=deb%2Fpackages.git diff --git a/lib/Packages/I18N/Locale.pm b/lib/Packages/I18N/Locale.pm index 94fd899..8c27430 100644 --- a/lib/Packages/I18N/Locale.pm +++ b/lib/Packages/I18N/Locale.pm @@ -14,15 +14,14 @@ use Locale::Maketext::Lexicon { use base 'Exporter'; -our @EXPORT = qw( _g N_ ); +our @EXPORT = qw( N_ ); -sub _g { return $_[0]; } sub N_ { return $_[0]; } sub g { my ($self, $format, @args) = @_; my $result = $self->maketext($format, @args); - return sprintf($result, @args) if $result =~ /%[su]/; + return sprintf($result, @args) if $result =~ /%([su]|[.\d]*f)/; return $result; }