I18N-Langinfo/Langinfo.pm: Pod nit
authorAaron Trevena <aaaron.trevena@gmail.com>
Wed, 20 Mar 2013 15:00:08 +0000 (09:00 -0600)
committerKarl Williamson <public@khwilliamson.com>
Wed, 20 Mar 2013 15:07:05 +0000 (09:07 -0600)
ext/I18N-Langinfo/Langinfo.pm

index 0b6ef2a..ee9d63c 100644 (file)
@@ -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] ";