Packages::I18N::Locale: Also catch %f format strings in the compat layer

diff --git a/lib/Packages/I18N/Locale.pm b/lib/Packages/I18N/Locale.pm
index 94fd8990fdf8013f981e67b1b8ba437fec9e4bc2..ae64b93303d06c5d9ae861a87eb616f8181ecb32 100644 (file)
--- a/lib/Packages/I18N/Locale.pm
+++ b/lib/Packages/I18N/Locale.pm
@@ -22,7 +22,7 @@ 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;
 }