diff options
| author | Piotr Fusik <pfusik@op.pl> | 2005-07-31 14:50:04 +0200 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2005-08-02 10:39:51 +0000 |
| commit | 3c4b39bee8832007b7e91bfce8701d34cacab411 (patch) | |
| tree | 190f72b72255db85e5c78f68a0d0047692aab3a9 /lib/I18N | |
| parent | db30010093a0bacd16d1fa3fd1bd5397da6479d3 (diff) | |
| download | perl-3c4b39bee8832007b7e91bfce8701d34cacab411.tar.gz | |
Typos in *.p[lm]
From: "Piotr Fusik" <pfusik@op.pl>
Message-ID: <001401c595bd$dccb5d80$0bd34dd5@piec>
p4raw-id: //depot/perl@25261
Diffstat (limited to 'lib/I18N')
| -rw-r--r-- | lib/I18N/LangTags.pm | 2 | ||||
| -rw-r--r-- | lib/I18N/LangTags/List.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lib/I18N/LangTags.pm b/lib/I18N/LangTags.pm index 6a39cae902..0bdc65fed1 100644 --- a/lib/I18N/LangTags.pm +++ b/lib/I18N/LangTags.pm @@ -489,7 +489,7 @@ lookup in %greetings fails. That's the Wrong Thing. You could instead do lookups on $wanted with: use I18N::LangTags qw(same_language_tag); - my $repsonse = ''; + my $response = ''; foreach my $l2 (keys %greetings) { if(same_language_tag($wanted, $l2)) { $response = $greetings{$l2}; diff --git a/lib/I18N/LangTags/List.pm b/lib/I18N/LangTags/List.pm index 5e5363f682..5494bea21e 100644 --- a/lib/I18N/LangTags/List.pm +++ b/lib/I18N/LangTags/List.pm @@ -151,7 +151,7 @@ the language tag is syntactically valid and is for general use (like syntactically invalid and for tags, like "aus", that are listed in brackets below. This function is not exported. -The map of tags-to-names that it uses is accessable as +The map of tags-to-names that it uses is accessible as %I18N::LangTags::List::Name, and it's the same as the list that follows in this documentation, which should be useful to you even if you don't use this module. |