git.shiar.nl
/
perl
/
loc
/
.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Lirama::Loc
[perl/loc/.git]
/
Lirama
/
Loc.pm
diff --git
a/Lyrical/Loc.pm
b/Lirama/Loc.pm
similarity index 83%
rename from
Lyrical/Loc.pm
rename to
Lirama/Loc.pm
index 8dfaeb243f3f9cb2531de607a665175f2a2e4566..cd3529fcdf31fa06d6ca3478646fba1013471ca6 100644
(file)
--- a/
Lyrical/Loc.pm
+++ b/
Lirama/Loc.pm
@@
-1,4
+1,4
@@
-package L
yrical
::Loc;
+package L
irama
::Loc;
use strict;
use warnings;
use strict;
use warnings;
@@
-9,7
+9,7
@@
our @ISA = qw(Exporter);
our @EXPORT = qw(langpref);
our @EXPORT_OK = qw(@langpref loc);
our @EXPORT = qw(langpref);
our @EXPORT_OK = qw(@langpref loc);
-our @langpref = qw(en eo nl sv
de fr ru kr
);
+our @langpref = qw(en eo nl sv
el hu de fr ru kr fi
);
sub langpref {
# @_ is order of languages (prefered language last)
sub langpref {
# @_ is order of languages (prefered language last)
@@
-75,15
+75,20
@@
sub NEXTKEY {
1;
1;
+__END__
+
+
=head1 NAME
=head1 NAME
-L
yrical
::Loc - Localize strings
+L
irama
::Loc - Localize strings
=head1 SYNOPSIS
=head1 SYNOPSIS
- use Lyrical::Loc;
- langpref(qw/en eo/);
- tie my %loc, "Lyrical::Loc", {
+ use Lirama::Loc;
+
+ langpref(qw/en eo/); # prefer esperanto texts
+
+ tie my %loc, "Lirama::Loc", {
test => {
en => "this is a test",
eo => "cxi tio estas testo",
test => {
en => "this is a test",
eo => "cxi tio estas testo",
@@
-95,8
+100,16
@@
Lyrical::Loc - Localize strings
=head1 DESCRIPTION
=head1 DESCRIPTION
+Returns a text in the preferred language.
+
+=head1 SEE ALSO
+
+L<Locale::Maketext|Locale::Maketext>
+
=head1 AUTHOR
=head1 AUTHOR
-Mischa Poslawsky <shiar@shiar.org>
+Mischa POSLAWSKY <shiar@shiar.org>
+
+Copyright 2005 Mischa POSLAWSKY. All rights reserved.
=cut
=cut