diff options
| author | Aaron Trevena <aaaron.trevena@gmail.com> | 2013-03-20 09:00:08 -0600 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2013-03-20 09:07:05 -0600 |
| commit | 60b8fafeb11519ee514f3d9213b109aa52133e87 (patch) | |
| tree | fe06e047282e31838ec177e6c780155b09184463 /ext/I18N-Langinfo | |
| parent | 60aa270f351bfcddc87c6997a9225f2503d5c2b5 (diff) | |
| download | perl-60b8fafeb11519ee514f3d9213b109aa52133e87.tar.gz | |
I18N-Langinfo/Langinfo.pm: Pod nit
Diffstat (limited to 'ext/I18N-Langinfo')
| -rw-r--r-- | ext/I18N-Langinfo/Langinfo.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/I18N-Langinfo/Langinfo.pm b/ext/I18N-Langinfo/Langinfo.pm index 0b6ef2a10d..ee9d63c4a1 100644 --- a/ext/I18N-Langinfo/Langinfo.pm +++ b/ext/I18N-Langinfo/Langinfo.pm @@ -72,7 +72,7 @@ our @EXPORT_OK = qw( YESSTR ); -our $VERSION = '0.09'; +our $VERSION = '0.10'; XSLoader::load(); @@ -103,7 +103,7 @@ answers for a yes/no question in the current locale. use I18N::Langinfo qw(langinfo ABDAY_1 YESSTR NOSTR); - my ($abday_1, $yesstr, $nostr) = map { langinfo } qw(ABDAY_1 YESSTR NOSTR); + my ($abday_1, $yesstr, $nostr) = map { langinfo($_) } (ABDAY_1, YESSTR, NOSTR); print "$abday_1? [$yesstr/$nostr] "; |