diff options
| author | Slaven Rezic <slaven@rezic.de> | 2009-05-19 22:50:45 +0200 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2014-11-16 10:32:55 -0800 |
| commit | 4fe3eaa08a5468252eedd11b4fed4da542bcd926 (patch) | |
| tree | 031a16cbd454fb8da4e1a61eacd07f6ce6fc39ab /ext/I18N-Langinfo | |
| parent | bb6a367ad5d39a6d163bda06f6788f8e7833b713 (diff) | |
| download | perl-4fe3eaa08a5468252eedd11b4fed4da542bcd926.tar.gz | |
$@ check in I18N::Langinfo documentation is reversed
Diffstat (limited to 'ext/I18N-Langinfo')
| -rw-r--r-- | ext/I18N-Langinfo/Langinfo.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/I18N-Langinfo/Langinfo.pm b/ext/I18N-Langinfo/Langinfo.pm index 8bca111305..41221753f9 100644 --- a/ext/I18N-Langinfo/Langinfo.pm +++ b/ext/I18N-Langinfo/Langinfo.pm @@ -166,7 +166,7 @@ you can wrap the import in an eval like this: I18N::Langinfo->import(qw(langinfo CODESET)); $codeset = langinfo(CODESET()); # note the () }; - if (!$@) { ... failed ... } + if ($@) { ... failed ... } =head2 EXPORT |