From 8de4179424c1ce7de2d7779c01e54e3e2e372911 Mon Sep 17 00:00:00 2001 From: Nicholas Clark Date: Fri, 2 Oct 2009 18:21:32 +0100 Subject: Move Locale::Maketext::Simple from dist/ to cpan/ My mistake - it should always have been here, as the canonical upstream is Best Practical's svn. --- MANIFEST | 20 +- Porting/Maintainers.pl | 4 +- .../lib/Locale/Maketext/Simple.pm | 341 +++++++++++++++++++++ cpan/Locale-Maketext-Simple/t/0-signature.t | 27 ++ cpan/Locale-Maketext-Simple/t/1-basic.t | 26 ++ .../t/2-load_po_without_i_default.t | 30 ++ .../t/3-load_po_with_i_default.t | 31 ++ .../t/po_with_i_default/en.po | 30 ++ .../t/po_with_i_default/fr.po | 30 ++ .../t/po_with_i_default/i_default.po | 30 ++ .../t/po_without_i_default/en.po | 30 ++ .../t/po_without_i_default/fr.po | 30 ++ .../lib/Locale/Maketext/Simple.pm | 341 --------------------- dist/Locale-Maketext-Simple/t/0-signature.t | 27 -- dist/Locale-Maketext-Simple/t/1-basic.t | 26 -- .../t/2-load_po_without_i_default.t | 30 -- .../t/3-load_po_with_i_default.t | 31 -- .../t/po_with_i_default/en.po | 30 -- .../t/po_with_i_default/fr.po | 30 -- .../t/po_with_i_default/i_default.po | 30 -- .../t/po_without_i_default/en.po | 30 -- .../t/po_without_i_default/fr.po | 30 -- 22 files changed, 617 insertions(+), 617 deletions(-) create mode 100644 cpan/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm create mode 100644 cpan/Locale-Maketext-Simple/t/0-signature.t create mode 100755 cpan/Locale-Maketext-Simple/t/1-basic.t create mode 100755 cpan/Locale-Maketext-Simple/t/2-load_po_without_i_default.t create mode 100755 cpan/Locale-Maketext-Simple/t/3-load_po_with_i_default.t create mode 100644 cpan/Locale-Maketext-Simple/t/po_with_i_default/en.po create mode 100644 cpan/Locale-Maketext-Simple/t/po_with_i_default/fr.po create mode 100644 cpan/Locale-Maketext-Simple/t/po_with_i_default/i_default.po create mode 100644 cpan/Locale-Maketext-Simple/t/po_without_i_default/en.po create mode 100644 cpan/Locale-Maketext-Simple/t/po_without_i_default/fr.po delete mode 100644 dist/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm delete mode 100644 dist/Locale-Maketext-Simple/t/0-signature.t delete mode 100755 dist/Locale-Maketext-Simple/t/1-basic.t delete mode 100755 dist/Locale-Maketext-Simple/t/2-load_po_without_i_default.t delete mode 100755 dist/Locale-Maketext-Simple/t/3-load_po_with_i_default.t delete mode 100644 dist/Locale-Maketext-Simple/t/po_with_i_default/en.po delete mode 100644 dist/Locale-Maketext-Simple/t/po_with_i_default/fr.po delete mode 100644 dist/Locale-Maketext-Simple/t/po_with_i_default/i_default.po delete mode 100644 dist/Locale-Maketext-Simple/t/po_without_i_default/en.po delete mode 100644 dist/Locale-Maketext-Simple/t/po_without_i_default/fr.po diff --git a/MANIFEST b/MANIFEST index 2c2ed0c04b..e41ec6dd9a 100644 --- a/MANIFEST +++ b/MANIFEST @@ -1355,6 +1355,16 @@ cpan/Locale-Codes/t/language.t See if Locale::Codes work cpan/Locale-Codes/t/rename.t See if Locale::Codes work cpan/Locale-Codes/t/script.t See if Locale::Codes work cpan/Locale-Codes/t/uk.t See if Locale::Codes work +cpan/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm Locale::Simple +cpan/Locale-Maketext-Simple/t/0-signature.t Locale::Simple tests +cpan/Locale-Maketext-Simple/t/1-basic.t Locale::Simple tests +cpan/Locale-Maketext-Simple/t/2-load_po_without_i_default.t Locale::Simple tests +cpan/Locale-Maketext-Simple/t/3-load_po_with_i_default.t Locale::Simple tests +cpan/Locale-Maketext-Simple/t/po_with_i_default/en.po Locale::Simple tests +cpan/Locale-Maketext-Simple/t/po_with_i_default/fr.po Locale::Simple tests +cpan/Locale-Maketext-Simple/t/po_with_i_default/i_default.po Locale::Simple tests +cpan/Locale-Maketext-Simple/t/po_without_i_default/en.po Locale::Simple tests +cpan/Locale-Maketext-Simple/t/po_without_i_default/fr.po Locale::Simple tests cpan/Log-Message/lib/Log/Message/Config.pm Log::Message cpan/Log-Message/lib/Log/Message/Handlers.pm Log::Message cpan/Log-Message/lib/Log/Message/Item.pm Log::Message @@ -2634,16 +2644,6 @@ dist/Locale-Maketext/lib/Locale/Maketext.pm Locale::Maketext dist/Locale-Maketext/lib/Locale/Maketext.pod Locale::Maketext documentation dist/Locale-Maketext/lib/Locale/Maketext/TPJ13.pod Locale::Maketext documentation article dist/Locale-Maketext/README Locale::Maketext -dist/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm Locale::Simple -dist/Locale-Maketext-Simple/t/0-signature.t Locale::Simple tests -dist/Locale-Maketext-Simple/t/1-basic.t Locale::Simple tests -dist/Locale-Maketext-Simple/t/2-load_po_without_i_default.t Locale::Simple tests -dist/Locale-Maketext-Simple/t/3-load_po_with_i_default.t Locale::Simple tests -dist/Locale-Maketext-Simple/t/po_with_i_default/en.po Locale::Simple tests -dist/Locale-Maketext-Simple/t/po_with_i_default/fr.po Locale::Simple tests -dist/Locale-Maketext-Simple/t/po_with_i_default/i_default.po Locale::Simple tests -dist/Locale-Maketext-Simple/t/po_without_i_default/en.po Locale::Simple tests -dist/Locale-Maketext-Simple/t/po_without_i_default/fr.po Locale::Simple tests dist/Locale-Maketext/t/01_about_verbose.t See if Locale::Maketext works dist/Locale-Maketext/t/10_make.t See if Locale::Maketext works dist/Locale-Maketext/t/20_get.t See if Locale::Maketext works diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl index 1ff80c1a9d..4ceba32631 100755 --- a/Porting/Maintainers.pl +++ b/Porting/Maintainers.pl @@ -857,10 +857,10 @@ use File::Glob qw(:case); { 'MAINTAINER' => 'audreyt', 'DISTRIBUTION' => 'JESSE/Locale-Maketext-Simple-0.21.tar.gz', - 'FILES' => q[dist/Locale-Maketext-Simple], + 'FILES' => q[cpan/Locale-Maketext-Simple], 'EXCLUDED' => [ qr{^inc/} ], 'CPAN' => 1, - 'UPSTREAM' => 'blead', + 'UPSTREAM' => 'cpan', }, 'Log::Message' => diff --git a/cpan/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm b/cpan/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm new file mode 100644 index 0000000000..30760f3c26 --- /dev/null +++ b/cpan/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm @@ -0,0 +1,341 @@ +package Locale::Maketext::Simple; +$Locale::Maketext::Simple::VERSION = '0.21'; + +use strict; +use 5.005; + +=head1 NAME + +Locale::Maketext::Simple - Simple interface to Locale::Maketext::Lexicon + +=head1 VERSION + +This document describes version 0.18 of Locale::Maketext::Simple, +released Septermber 8, 2006. + +=head1 SYNOPSIS + +Minimal setup (looks for F and F): + + package Foo; + use Locale::Maketext::Simple; # exports 'loc' + loc_lang('fr'); # set language to French + sub hello { + print loc("Hello, [_1]!", "World"); + } + +More sophisticated example: + + package Foo::Bar; + use Locale::Maketext::Simple ( + Class => 'Foo', # search in auto/Foo/ + Style => 'gettext', # %1 instead of [_1] + Export => 'maketext', # maketext() instead of loc() + Subclass => 'L10N', # Foo::L10N instead of Foo::I18N + Decode => 1, # decode entries to unicode-strings + Encoding => 'locale', # but encode lexicons in current locale + # (needs Locale::Maketext::Lexicon 0.36) + ); + sub japh { + print maketext("Just another %1 hacker", "Perl"); + } + +=head1 DESCRIPTION + +This module is a simple wrapper around B, +designed to alleviate the need of creating I for +module authors. + +The language used is chosen from the loc_lang call. If a lookup is not +possible, the i-default language will be used. If the lookup is not in the +i-default language, then the key will be returned. + +If B is not present, it implements a +minimal localization function by simply interpolating C<[_1]> with +the first argument, C<[_2]> with the second, etc. Interpolated +function like C<[quant,_1]> are treated as C<[_1]>, with the sole +exception of C<[tense,_1,X]>, which will append C to C<_1> when +X is C, or appending C to <_1> otherwise. + +=head1 OPTIONS + +All options are passed either via the C statement, or via an +explicit C. + +=head2 Class + +By default, B draws its source from the +calling package's F directory; you can override this behaviour +by explicitly specifying another package as C. + +=head2 Path + +If your PO and MO files are under a path elsewhere than C, +you may specify it using the C option. + +=head2 Style + +By default, this module uses the C style of C<[_1]> and +C<[quant,_1]> for interpolation. Alternatively, you can specify the +C style, which uses C<%1> and C<%quant(%1)> for interpolation. + +This option is case-insensitive. + +=head2 Export + +By default, this module exports a single function, C, into its +caller's namespace. You can set it to another name, or set it to +an empty string to disable exporting. + +=head2 Subclass + +By default, this module creates an C<::I18N> subclass under the +caller's package (or the package specified by C), and stores +lexicon data in its subclasses. You can assign a name other than +C via this option. + +=head2 Decode + +If set to a true value, source entries will be converted into +utf8-strings (available in Perl 5.6.1 or later). This feature +needs the B or B module. + +=head2 Encoding + +Specifies an encoding to store lexicon entries, instead of +utf8-strings. If set to C, the encoding from the current +locale setting is used. Implies a true value for C. + +=cut + +sub import { + my ($class, %args) = @_; + + $args{Class} ||= caller; + $args{Style} ||= 'maketext'; + $args{Export} ||= 'loc'; + $args{Subclass} ||= 'I18N'; + + my ($loc, $loc_lang) = $class->load_loc(%args); + $loc ||= $class->default_loc(%args); + + no strict 'refs'; + *{caller(0) . "::$args{Export}"} = $loc if $args{Export}; + *{caller(0) . "::$args{Export}_lang"} = $loc_lang || sub { 1 }; +} + +my %Loc; + +sub reload_loc { %Loc = () } + +sub load_loc { + my ($class, %args) = @_; + + my $pkg = join('::', grep { defined and length } $args{Class}, $args{Subclass}); + return $Loc{$pkg} if exists $Loc{$pkg}; + + eval { require Locale::Maketext::Lexicon; 1 } or return; + $Locale::Maketext::Lexicon::VERSION > 0.20 or return; + eval { require File::Spec; 1 } or return; + + my $path = $args{Path} || $class->auto_path($args{Class}) or return; + my $pattern = File::Spec->catfile($path, '*.[pm]o'); + my $decode = $args{Decode} || 0; + my $encoding = $args{Encoding} || undef; + + $decode = 1 if $encoding; + + $pattern =~ s{\\}{/}g; # to counter win32 paths + + eval " + package $pkg; + use base 'Locale::Maketext'; + Locale::Maketext::Lexicon->import({ + 'i-default' => [ 'Auto' ], + '*' => [ Gettext => \$pattern ], + _decode => \$decode, + _encoding => \$encoding, + }); + *${pkg}::Lexicon = \\%${pkg}::i_default::Lexicon; + *tense = sub { \$_[1] . ((\$_[2] eq 'present') ? 'ing' : 'ed') } + unless defined &tense; + + 1; + " or die $@; + + my $lh = eval { $pkg->get_handle } or return; + my $style = lc($args{Style}); + if ($style eq 'maketext') { + $Loc{$pkg} = sub { + $lh->maketext(@_) + }; + } + elsif ($style eq 'gettext') { + $Loc{$pkg} = sub { + my $str = shift; + $str =~ s{([\~\[\]])}{~$1}g; + $str =~ s{ + ([%\\]%) # 1 - escaped sequence + | + % (?: + ([A-Za-z#*]\w*) # 2 - function call + \(([^\)]*)\) # 3 - arguments + | + ([1-9]\d*|\*) # 4 - variable + ) + }{ + $1 ? $1 + : $2 ? "\[$2,"._unescape($3)."]" + : "[_$4]" + }egx; + return $lh->maketext($str, @_); + }; + } + else { + die "Unknown Style: $style"; + } + + return $Loc{$pkg}, sub { + $lh = $pkg->get_handle(@_); + }; +} + +sub default_loc { + my ($self, %args) = @_; + my $style = lc($args{Style}); + if ($style eq 'maketext') { + return sub { + my $str = shift; + $str =~ s{((? 1) ? ($4 || "$3s") : $3) : + '' + ) : '' + ); + }egx; + return $str; +}; + +sub _escape { + my $text = shift; + $text =~ s/\b_([1-9]\d*)/%$1/g; + return $text; +} + +sub _unescape { + join(',', map { + /\A(\s*)%([1-9]\d*|\*)(\s*)\z/ ? "$1_$2$3" : $_ + } split(/,/, $_[0])); +} + +sub auto_path { + my ($self, $calldir) = @_; + $calldir =~ s#::#/#g; + my $path = $INC{$calldir . '.pm'} or return; + + # Try absolute path name. + if ($^O eq 'MacOS') { + (my $malldir = $calldir) =~ tr#/#:#; + $path =~ s#^(.*)$malldir\.pm\z#$1auto:$malldir:#s; + } else { + $path =~ s#^(.*)$calldir\.pm\z#$1auto/$calldir/#; + } + + return $path if -d $path; + + # If that failed, try relative path with normal @INC searching. + $path = "auto/$calldir/"; + foreach my $inc (@INC) { + return "$inc/$path" if -d "$inc/$path"; + } + + return; +} + +1; + +=head1 ACKNOWLEDGMENTS + +Thanks to Jos I. Boumans for suggesting this module to be written. + +Thanks to Chia-Liang Kao for suggesting C and C. + +=head1 SEE ALSO + +L, L + +=head1 AUTHORS + +Audrey Tang Ecpan@audreyt.orgE + +=head1 COPYRIGHT + +Copyright 2003, 2004, 2005, 2006 by Audrey Tang Ecpan@audreyt.orgE. + +This software is released under the MIT license cited below. Additionally, +when this software is distributed with B, you may also +redistribute it and/or modify it under the same terms as Perl itself. + +=head2 The "MIT" License + +Permission is hereby granted, free of charge, to any person obtaining a copy +of this software and associated documentation files (the "Software"), to deal +in the Software without restriction, including without limitation the rights +to use, copy, modify, merge, publish, distribute, sublicense, and/or sell +copies of the Software, and to permit persons to whom the Software is +furnished to do so, subject to the following conditions: + +The above copyright notice and this permission notice shall be included in +all copies or substantial portions of the Software. + +THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS +OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL +THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER +LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING +FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER +DEALINGS IN THE SOFTWARE. + +=cut diff --git a/cpan/Locale-Maketext-Simple/t/0-signature.t b/cpan/Locale-Maketext-Simple/t/0-signature.t new file mode 100644 index 0000000000..c70c4a3cca --- /dev/null +++ b/cpan/Locale-Maketext-Simple/t/0-signature.t @@ -0,0 +1,27 @@ +#!/usr/bin/perl + +use strict; +print "1..1\n"; + +if (!$ENV{TEST_SIGNATURE}) { + print "ok 1 # skip set the environment variable TEST_SIGNATURE to enable this test\n"; +} +elsif (!-s 'SIGNATURE') { + print "ok 1 # skip No signature file found\n"; +} +elsif (!eval { require Module::Signature; 1 }) { + print "ok 1 # skip ", + "Next time around, consider install Module::Signature, ", + "so you can verify the integrity of this distribution.\n"; +} +elsif (!eval { require Socket; Socket::inet_aton('pgp.mit.edu') }) { + print "ok 1 # skip ", + "Cannot connect to the keyserver\n"; +} +else { + (Module::Signature::verify() == Module::Signature::SIGNATURE_OK()) + or print "not "; + print "ok 1 # Valid signature\n"; +} + +__END__ diff --git a/cpan/Locale-Maketext-Simple/t/1-basic.t b/cpan/Locale-Maketext-Simple/t/1-basic.t new file mode 100755 index 0000000000..91d033b795 --- /dev/null +++ b/cpan/Locale-Maketext-Simple/t/1-basic.t @@ -0,0 +1,26 @@ +use strict; +use Test; + +BEGIN { + plan tests => 9; + $INC{'Locale/Maketext/Lexicon.pm'} = __FILE__; + $Locale::Maketext::Lexicon::VERSION = 0; +} + +use Locale::Maketext::Simple; +ok(Locale::Maketext::Simple->VERSION); +ok(loc("Just [_1] Perl [_2]", qw(another hacker)), "Just another Perl hacker"); + +{ + local $^W; # shuts up 'redefined' warnings + Locale::Maketext::Simple->reload_loc; + Locale::Maketext::Simple->import(Style => 'gettext'); +} + +ok(loc("Just %1 Perl %2", qw(another hacker)), "Just another Perl hacker"); +ok(loc_lang('fr')); +ok(loc("Just %quant(%1,Perl hacker)", 1), "Just 1 Perl hacker"); +ok(loc("Just %quant(%1,Perl hacker)", 2), "Just 2 Perl hackers"); +ok(loc("Just %quant(%1,Mad skill,Mad skillz)", 3), "Just 3 Mad skillz"); +ok(loc("Error %tense(%1,present)", 'uninstall'), "Error uninstalling"); +ok(loc("Error %tense(uninstall,present)"), "Error uninstalling"); diff --git a/cpan/Locale-Maketext-Simple/t/2-load_po_without_i_default.t b/cpan/Locale-Maketext-Simple/t/2-load_po_without_i_default.t new file mode 100755 index 0000000000..47a982307e --- /dev/null +++ b/cpan/Locale-Maketext-Simple/t/2-load_po_without_i_default.t @@ -0,0 +1,30 @@ +use strict; +use Test::More; +use FindBin qw($Bin); + +use Locale::Maketext::Simple ( + Path => "$Bin/po_without_i_default", + Style => "gettext", +); + +eval { + require Locale::Maketext::Lexicon; + die unless Locale::Maketext::Lexicon->VERSION(0.20); + require File::Spec; +}; +if ($@) { + plan skip_all => 'No soft dependencies, i_default will not work'; + exit 0; +} + +plan tests => 5; + +loc_lang("en"); +is(loc("Not a lexicon key"), "Not a lexicon key", "Not a lexicon key"); +is(loc("I have got %1 alerts", 65), "I have got 65 alerts", "Got auto key" ); +is(loc("I have acknowledged %1 alerts", 83), "Yo dude, I've been working on these 83 alerts", "Got translation"); + +loc_lang("fr"); +is(loc("system.messages.arbitrary.unique.lexicon.key"), "system.messages.arbitrary.unique.lexicon.key", "No translation" ); +is(loc("I have got %1 alerts", "red"), "Mon Francais red, c'est terrible", "French translated" ); + diff --git a/cpan/Locale-Maketext-Simple/t/3-load_po_with_i_default.t b/cpan/Locale-Maketext-Simple/t/3-load_po_with_i_default.t new file mode 100755 index 0000000000..a8807106dd --- /dev/null +++ b/cpan/Locale-Maketext-Simple/t/3-load_po_with_i_default.t @@ -0,0 +1,31 @@ +use strict; +use Test::More; +use FindBin qw($Bin); + +use Locale::Maketext::Simple ( + Path => "$Bin/po_with_i_default", + Style => "gettext", +); + +eval { + require Locale::Maketext::Lexicon; + die unless Locale::Maketext::Lexicon->VERSION(0.20); + require File::Spec; +}; +if ($@) { + plan skip_all => 'No soft dependencies, i_default will not work'; + exit 0; +} + +plan tests => 6; + +loc_lang("en"); +is(loc("Not a lexicon key"), "Not a lexicon key", "Not a lexicon key"); +is(loc("I have got %1 alerts", "hot"), "Maybe it's because I'm a hot Londoner, that I love London tawn", "Got auto key" ); +is(loc("I have acknowledged %1 alerts", 83), "Yo dude, I've been working on these 83 alerts", "Got translation still in en"); +is(loc("system.messages.arbitrary.unique.lexicon.key"), "This is the default message", "Used i_default because not set in en"); + +loc_lang("fr"); +is(loc("system.messages.arbitrary.unique.lexicon.key"), "This is the default message", "Translated from i_default"); +is(loc("I have got %1 alerts", "red"), "Mon Francais red, c'est terrible", "French translated" ); + diff --git a/cpan/Locale-Maketext-Simple/t/po_with_i_default/en.po b/cpan/Locale-Maketext-Simple/t/po_with_i_default/en.po new file mode 100644 index 0000000000..0d80b92ef5 --- /dev/null +++ b/cpan/Locale-Maketext-Simple/t/po_with_i_default/en.po @@ -0,0 +1,30 @@ +# Locale Maketext Simple language translations +# Copyright (C) All Perl Hackers everywhere +# Ton Voon , 2009. +# +msgid "" +msgstr "" +"Project-Id-Version: Locale Maketext Simple\n" +"POT-Creation-Date: YEAR-MO-DA HO:MI+ZONE\n" +"PO-Revision-Date: 2009-06-09 14:10+0000\n" +"Last-Translator: Ton Voon \n" +"Language-Team: English \n" +"MIME-Version: 1.0\n" +"Content-Type: text/plain; charset=UTF-8\n" +"Content-Transfer-Encoding: 8bit\n" + +#. $alerts +#: lib/Opsview/Web/Controller/Root.pm:492 +msgid "I have got %1 alerts" +msgstr "" + +#. $acknowledged +#: lib/Opsview/Web/Controller/Root.pm:492 +msgid "I have acknowledged %1 alerts" +msgstr "Yo dude, I've been working on these %1 alerts" + +#. $acknowledged +#: lib/Opsview/Web/Controller/Root.pm:492 +msgid "system.messages.arbitrary.unique.lexicon.key" +msgstr "" + diff --git a/cpan/Locale-Maketext-Simple/t/po_with_i_default/fr.po b/cpan/Locale-Maketext-Simple/t/po_with_i_default/fr.po new file mode 100644 index 0000000000..8ecfbf761a --- /dev/null +++ b/cpan/Locale-Maketext-Simple/t/po_with_i_default/fr.po @@ -0,0 +1,30 @@ +# Locale Maketext Simple language translations +# Copyright (C) All Perl Hackers everywhere +# Ton Voon , 2009. +# +msgid "" +msgstr "" +"Project-Id-Version: Locale Maketext Simple\n" +"POT-Creation-Date: YEAR-MO-DA HO:MI+ZONE\n" +"PO-Revision-Date: 2009-06-09 14:10+0000\n" +"Last-Translator: Ton Voon \n" +"Language-Team: French \n" +"MIME-Version: 1.0\n" +"Content-Type: text/plain; charset=UTF-8\n" +"Content-Transfer-Encoding: 8bit\n" + +#. $alerts +#: lib/Opsview/Web/Controller/Root.pm:492 +msgid "I have got %1 alerts" +msgstr "Mon Francais %1, c'est terrible" + +#. $acknowledged +#: lib/Opsview/Web/Controller/Root.pm:492 +msgid "I have acknowledged %1 alerts" +msgstr "" + +#. $acknowledged +#: lib/Opsview/Web/Controller/Root.pm:492 +msgid "system.messages.arbitrary.unique.lexicon.key" +msgstr "" + diff --git a/cpan/Locale-Maketext-Simple/t/po_with_i_default/i_default.po b/cpan/Locale-Maketext-Simple/t/po_with_i_default/i_default.po new file mode 100644 index 0000000000..7327298688 --- /dev/null +++ b/cpan/Locale-Maketext-Simple/t/po_with_i_default/i_default.po @@ -0,0 +1,30 @@ +# Locale Maketext Simple language translations +# Copyright (C) All Perl Hackers everywhere +# Ton Voon , 2009. +# +msgid "" +msgstr "" +"Project-Id-Version: Locale Maketext Simple\n" +"POT-Creation-Date: YEAR-MO-DA HO:MI+ZONE\n" +"PO-Revision-Date: 2009-06-09 14:10+0000\n" +"Last-Translator: Ton Voon \n" +"Language-Team: English \n" +"MIME-Version: 1.0\n" +"Content-Type: text/plain; charset=UTF-8\n" +"Content-Transfer-Encoding: 8bit\n" + +#. $alerts +#: lib/Opsview/Web/Controller/Root.pm:492 +msgid "I have got %1 alerts" +msgstr "Maybe it's because I'm a %1 Londoner, that I love London tawn" + +#. $acknowledged +#: lib/Opsview/Web/Controller/Root.pm:492 +msgid "I have acknowledged %1 alerts" +msgstr "In idefault instead of en" + +#. $acknowledged +#: lib/Opsview/Web/Controller/Root.pm:492 +msgid "system.messages.arbitrary.unique.lexicon.key" +msgstr "This is the default message" + diff --git a/cpan/Locale-Maketext-Simple/t/po_without_i_default/en.po b/cpan/Locale-Maketext-Simple/t/po_without_i_default/en.po new file mode 100644 index 0000000000..0d80b92ef5 --- /dev/null +++ b/cpan/Locale-Maketext-Simple/t/po_without_i_default/en.po @@ -0,0 +1,30 @@ +# Locale Maketext Simple language translations +# Copyright (C) All Perl Hackers everywhere +# Ton Voon , 2009. +# +msgid "" +msgstr "" +"Project-Id-Version: Locale Maketext Simple\n" +"POT-Creation-Date: YEAR-MO-DA HO:MI+ZONE\n" +"PO-Revision-Date: 2009-06-09 14:10+0000\n" +"Last-Translator: Ton Voon \n" +"Language-Team: English \n" +"MIME-Version: 1.0\n" +"Content-Type: text/plain; charset=UTF-8\n" +"Content-Transfer-Encoding: 8bit\n" + +#. $alerts +#: lib/Opsview/Web/Controller/Root.pm:492 +msgid "I have got %1 alerts" +msgstr "" + +#. $acknowledged +#: lib/Opsview/Web/Controller/Root.pm:492 +msgid "I have acknowledged %1 alerts" +msgstr "Yo dude, I've been working on these %1 alerts" + +#. $acknowledged +#: lib/Opsview/Web/Controller/Root.pm:492 +msgid "system.messages.arbitrary.unique.lexicon.key" +msgstr "" + diff --git a/cpan/Locale-Maketext-Simple/t/po_without_i_default/fr.po b/cpan/Locale-Maketext-Simple/t/po_without_i_default/fr.po new file mode 100644 index 0000000000..8ecfbf761a --- /dev/null +++ b/cpan/Locale-Maketext-Simple/t/po_without_i_default/fr.po @@ -0,0 +1,30 @@ +# Locale Maketext Simple language translations +# Copyright (C) All Perl Hackers everywhere +# Ton Voon , 2009. +# +msgid "" +msgstr "" +"Project-Id-Version: Locale Maketext Simple\n" +"POT-Creation-Date: YEAR-MO-DA HO:MI+ZONE\n" +"PO-Revision-Date: 2009-06-09 14:10+0000\n" +"Last-Translator: Ton Voon \n" +"Language-Team: French \n" +"MIME-Version: 1.0\n" +"Content-Type: text/plain; charset=UTF-8\n" +"Content-Transfer-Encoding: 8bit\n" + +#. $alerts +#: lib/Opsview/Web/Controller/Root.pm:492 +msgid "I have got %1 alerts" +msgstr "Mon Francais %1, c'est terrible" + +#. $acknowledged +#: lib/Opsview/Web/Controller/Root.pm:492 +msgid "I have acknowledged %1 alerts" +msgstr "" + +#. $acknowledged +#: lib/Opsview/Web/Controller/Root.pm:492 +msgid "system.messages.arbitrary.unique.lexicon.key" +msgstr "" + diff --git a/dist/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm b/dist/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm deleted file mode 100644 index 30760f3c26..0000000000 --- a/dist/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm +++ /dev/null @@ -1,341 +0,0 @@ -package Locale::Maketext::Simple; -$Locale::Maketext::Simple::VERSION = '0.21'; - -use strict; -use 5.005; - -=head1 NAME - -Locale::Maketext::Simple - Simple interface to Locale::Maketext::Lexicon - -=head1 VERSION - -This document describes version 0.18 of Locale::Maketext::Simple, -released Septermber 8, 2006. - -=head1 SYNOPSIS - -Minimal setup (looks for F and F): - - package Foo; - use Locale::Maketext::Simple; # exports 'loc' - loc_lang('fr'); # set language to French - sub hello { - print loc("Hello, [_1]!", "World"); - } - -More sophisticated example: - - package Foo::Bar; - use Locale::Maketext::Simple ( - Class => 'Foo', # search in auto/Foo/ - Style => 'gettext', # %1 instead of [_1] - Export => 'maketext', # maketext() instead of loc() - Subclass => 'L10N', # Foo::L10N instead of Foo::I18N - Decode => 1, # decode entries to unicode-strings - Encoding => 'locale', # but encode lexicons in current locale - # (needs Locale::Maketext::Lexicon 0.36) - ); - sub japh { - print maketext("Just another %1 hacker", "Perl"); - } - -=head1 DESCRIPTION - -This module is a simple wrapper around B, -designed to alleviate the need of creating I for -module authors. - -The language used is chosen from the loc_lang call. If a lookup is not -possible, the i-default language will be used. If the lookup is not in the -i-default language, then the key will be returned. - -If B is not present, it implements a -minimal localization function by simply interpolating C<[_1]> with -the first argument, C<[_2]> with the second, etc. Interpolated -function like C<[quant,_1]> are treated as C<[_1]>, with the sole -exception of C<[tense,_1,X]>, which will append C to C<_1> when -X is C, or appending C to <_1> otherwise. - -=head1 OPTIONS - -All options are passed either via the C statement, or via an -explicit C. - -=head2 Class - -By default, B draws its source from the -calling package's F directory; you can override this behaviour -by explicitly specifying another package as C. - -=head2 Path - -If your PO and MO files are under a path elsewhere than C, -you may specify it using the C option. - -=head2 Style - -By default, this module uses the C style of C<[_1]> and -C<[quant,_1]> for interpolation. Alternatively, you can specify the -C style, which uses C<%1> and C<%quant(%1)> for interpolation. - -This option is case-insensitive. - -=head2 Export - -By default, this module exports a single function, C, into its -caller's namespace. You can set it to another name, or set it to -an empty string to disable exporting. - -=head2 Subclass - -By default, this module creates an C<::I18N> subclass under the -caller's package (or the package specified by C), and stores -lexicon data in its subclasses. You can assign a name other than -C via this option. - -=head2 Decode - -If set to a true value, source entries will be converted into -utf8-strings (available in Perl 5.6.1 or later). This feature -needs the B or B module. - -=head2 Encoding - -Specifies an encoding to store lexicon entries, instead of -utf8-strings. If set to C, the encoding from the current -locale setting is used. Implies a true value for C. - -=cut - -sub import { - my ($class, %args) = @_; - - $args{Class} ||= caller; - $args{Style} ||= 'maketext'; - $args{Export} ||= 'loc'; - $args{Subclass} ||= 'I18N'; - - my ($loc, $loc_lang) = $class->load_loc(%args); - $loc ||= $class->default_loc(%args); - - no strict 'refs'; - *{caller(0) . "::$args{Export}"} = $loc if $args{Export}; - *{caller(0) . "::$args{Export}_lang"} = $loc_lang || sub { 1 }; -} - -my %Loc; - -sub reload_loc { %Loc = () } - -sub load_loc { - my ($class, %args) = @_; - - my $pkg = join('::', grep { defined and length } $args{Class}, $args{Subclass}); - return $Loc{$pkg} if exists $Loc{$pkg}; - - eval { require Locale::Maketext::Lexicon; 1 } or return; - $Locale::Maketext::Lexicon::VERSION > 0.20 or return; - eval { require File::Spec; 1 } or return; - - my $path = $args{Path} || $class->auto_path($args{Class}) or return; - my $pattern = File::Spec->catfile($path, '*.[pm]o'); - my $decode = $args{Decode} || 0; - my $encoding = $args{Encoding} || undef; - - $decode = 1 if $encoding; - - $pattern =~ s{\\}{/}g; # to counter win32 paths - - eval " - package $pkg; - use base 'Locale::Maketext'; - Locale::Maketext::Lexicon->import({ - 'i-default' => [ 'Auto' ], - '*' => [ Gettext => \$pattern ], - _decode => \$decode, - _encoding => \$encoding, - }); - *${pkg}::Lexicon = \\%${pkg}::i_default::Lexicon; - *tense = sub { \$_[1] . ((\$_[2] eq 'present') ? 'ing' : 'ed') } - unless defined &tense; - - 1; - " or die $@; - - my $lh = eval { $pkg->get_handle } or return; - my $style = lc($args{Style}); - if ($style eq 'maketext') { - $Loc{$pkg} = sub { - $lh->maketext(@_) - }; - } - elsif ($style eq 'gettext') { - $Loc{$pkg} = sub { - my $str = shift; - $str =~ s{([\~\[\]])}{~$1}g; - $str =~ s{ - ([%\\]%) # 1 - escaped sequence - | - % (?: - ([A-Za-z#*]\w*) # 2 - function call - \(([^\)]*)\) # 3 - arguments - | - ([1-9]\d*|\*) # 4 - variable - ) - }{ - $1 ? $1 - : $2 ? "\[$2,"._unescape($3)."]" - : "[_$4]" - }egx; - return $lh->maketext($str, @_); - }; - } - else { - die "Unknown Style: $style"; - } - - return $Loc{$pkg}, sub { - $lh = $pkg->get_handle(@_); - }; -} - -sub default_loc { - my ($self, %args) = @_; - my $style = lc($args{Style}); - if ($style eq 'maketext') { - return sub { - my $str = shift; - $str =~ s{((? 1) ? ($4 || "$3s") : $3) : - '' - ) : '' - ); - }egx; - return $str; -}; - -sub _escape { - my $text = shift; - $text =~ s/\b_([1-9]\d*)/%$1/g; - return $text; -} - -sub _unescape { - join(',', map { - /\A(\s*)%([1-9]\d*|\*)(\s*)\z/ ? "$1_$2$3" : $_ - } split(/,/, $_[0])); -} - -sub auto_path { - my ($self, $calldir) = @_; - $calldir =~ s#::#/#g; - my $path = $INC{$calldir . '.pm'} or return; - - # Try absolute path name. - if ($^O eq 'MacOS') { - (my $malldir = $calldir) =~ tr#/#:#; - $path =~ s#^(.*)$malldir\.pm\z#$1auto:$malldir:#s; - } else { - $path =~ s#^(.*)$calldir\.pm\z#$1auto/$calldir/#; - } - - return $path if -d $path; - - # If that failed, try relative path with normal @INC searching. - $path = "auto/$calldir/"; - foreach my $inc (@INC) { - return "$inc/$path" if -d "$inc/$path"; - } - - return; -} - -1; - -=head1 ACKNOWLEDGMENTS - -Thanks to Jos I. Boumans for suggesting this module to be written. - -Thanks to Chia-Liang Kao for suggesting C and C. - -=head1 SEE ALSO - -L, L - -=head1 AUTHORS - -Audrey Tang Ecpan@audreyt.orgE - -=head1 COPYRIGHT - -Copyright 2003, 2004, 2005, 2006 by Audrey Tang Ecpan@audreyt.orgE. - -This software is released under the MIT license cited below. Additionally, -when this software is distributed with B, you may also -redistribute it and/or modify it under the same terms as Perl itself. - -=head2 The "MIT" License - -Permission is hereby granted, free of charge, to any person obtaining a copy -of this software and associated documentation files (the "Software"), to deal -in the Software without restriction, including without limitation the rights -to use, copy, modify, merge, publish, distribute, sublicense, and/or sell -copies of the Software, and to permit persons to whom the Software is -furnished to do so, subject to the following conditions: - -The above copyright notice and this permission notice shall be included in -all copies or substantial portions of the Software. - -THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS -OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, -FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL -THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER -LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING -FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER -DEALINGS IN THE SOFTWARE. - -=cut diff --git a/dist/Locale-Maketext-Simple/t/0-signature.t b/dist/Locale-Maketext-Simple/t/0-signature.t deleted file mode 100644 index c70c4a3cca..0000000000 --- a/dist/Locale-Maketext-Simple/t/0-signature.t +++ /dev/null @@ -1,27 +0,0 @@ -#!/usr/bin/perl - -use strict; -print "1..1\n"; - -if (!$ENV{TEST_SIGNATURE}) { - print "ok 1 # skip set the environment variable TEST_SIGNATURE to enable this test\n"; -} -elsif (!-s 'SIGNATURE') { - print "ok 1 # skip No signature file found\n"; -} -elsif (!eval { require Module::Signature; 1 }) { - print "ok 1 # skip ", - "Next time around, consider install Module::Signature, ", - "so you can verify the integrity of this distribution.\n"; -} -elsif (!eval { require Socket; Socket::inet_aton('pgp.mit.edu') }) { - print "ok 1 # skip ", - "Cannot connect to the keyserver\n"; -} -else { - (Module::Signature::verify() == Module::Signature::SIGNATURE_OK()) - or print "not "; - print "ok 1 # Valid signature\n"; -} - -__END__ diff --git a/dist/Locale-Maketext-Simple/t/1-basic.t b/dist/Locale-Maketext-Simple/t/1-basic.t deleted file mode 100755 index 91d033b795..0000000000 --- a/dist/Locale-Maketext-Simple/t/1-basic.t +++ /dev/null @@ -1,26 +0,0 @@ -use strict; -use Test; - -BEGIN { - plan tests => 9; - $INC{'Locale/Maketext/Lexicon.pm'} = __FILE__; - $Locale::Maketext::Lexicon::VERSION = 0; -} - -use Locale::Maketext::Simple; -ok(Locale::Maketext::Simple->VERSION); -ok(loc("Just [_1] Perl [_2]", qw(another hacker)), "Just another Perl hacker"); - -{ - local $^W; # shuts up 'redefined' warnings - Locale::Maketext::Simple->reload_loc; - Locale::Maketext::Simple->import(Style => 'gettext'); -} - -ok(loc("Just %1 Perl %2", qw(another hacker)), "Just another Perl hacker"); -ok(loc_lang('fr')); -ok(loc("Just %quant(%1,Perl hacker)", 1), "Just 1 Perl hacker"); -ok(loc("Just %quant(%1,Perl hacker)", 2), "Just 2 Perl hackers"); -ok(loc("Just %quant(%1,Mad skill,Mad skillz)", 3), "Just 3 Mad skillz"); -ok(loc("Error %tense(%1,present)", 'uninstall'), "Error uninstalling"); -ok(loc("Error %tense(uninstall,present)"), "Error uninstalling"); diff --git a/dist/Locale-Maketext-Simple/t/2-load_po_without_i_default.t b/dist/Locale-Maketext-Simple/t/2-load_po_without_i_default.t deleted file mode 100755 index 47a982307e..0000000000 --- a/dist/Locale-Maketext-Simple/t/2-load_po_without_i_default.t +++ /dev/null @@ -1,30 +0,0 @@ -use strict; -use Test::More; -use FindBin qw($Bin); - -use Locale::Maketext::Simple ( - Path => "$Bin/po_without_i_default", - Style => "gettext", -); - -eval { - require Locale::Maketext::Lexicon; - die unless Locale::Maketext::Lexicon->VERSION(0.20); - require File::Spec; -}; -if ($@) { - plan skip_all => 'No soft dependencies, i_default will not work'; - exit 0; -} - -plan tests => 5; - -loc_lang("en"); -is(loc("Not a lexicon key"), "Not a lexicon key", "Not a lexicon key"); -is(loc("I have got %1 alerts", 65), "I have got 65 alerts", "Got auto key" ); -is(loc("I have acknowledged %1 alerts", 83), "Yo dude, I've been working on these 83 alerts", "Got translation"); - -loc_lang("fr"); -is(loc("system.messages.arbitrary.unique.lexicon.key"), "system.messages.arbitrary.unique.lexicon.key", "No translation" ); -is(loc("I have got %1 alerts", "red"), "Mon Francais red, c'est terrible", "French translated" ); - diff --git a/dist/Locale-Maketext-Simple/t/3-load_po_with_i_default.t b/dist/Locale-Maketext-Simple/t/3-load_po_with_i_default.t deleted file mode 100755 index a8807106dd..0000000000 --- a/dist/Locale-Maketext-Simple/t/3-load_po_with_i_default.t +++ /dev/null @@ -1,31 +0,0 @@ -use strict; -use Test::More; -use FindBin qw($Bin); - -use Locale::Maketext::Simple ( - Path => "$Bin/po_with_i_default", - Style => "gettext", -); - -eval { - require Locale::Maketext::Lexicon; - die unless Locale::Maketext::Lexicon->VERSION(0.20); - require File::Spec; -}; -if ($@) { - plan skip_all => 'No soft dependencies, i_default will not work'; - exit 0; -} - -plan tests => 6; - -loc_lang("en"); -is(loc("Not a lexicon key"), "Not a lexicon key", "Not a lexicon key"); -is(loc("I have got %1 alerts", "hot"), "Maybe it's because I'm a hot Londoner, that I love London tawn", "Got auto key" ); -is(loc("I have acknowledged %1 alerts", 83), "Yo dude, I've been working on these 83 alerts", "Got translation still in en"); -is(loc("system.messages.arbitrary.unique.lexicon.key"), "This is the default message", "Used i_default because not set in en"); - -loc_lang("fr"); -is(loc("system.messages.arbitrary.unique.lexicon.key"), "This is the default message", "Translated from i_default"); -is(loc("I have got %1 alerts", "red"), "Mon Francais red, c'est terrible", "French translated" ); - diff --git a/dist/Locale-Maketext-Simple/t/po_with_i_default/en.po b/dist/Locale-Maketext-Simple/t/po_with_i_default/en.po deleted file mode 100644 index 0d80b92ef5..0000000000 --- a/dist/Locale-Maketext-Simple/t/po_with_i_default/en.po +++ /dev/null @@ -1,30 +0,0 @@ -# Locale Maketext Simple language translations -# Copyright (C) All Perl Hackers everywhere -# Ton Voon , 2009. -# -msgid "" -msgstr "" -"Project-Id-Version: Locale Maketext Simple\n" -"POT-Creation-Date: YEAR-MO-DA HO:MI+ZONE\n" -"PO-Revision-Date: 2009-06-09 14:10+0000\n" -"Last-Translator: Ton Voon \n" -"Language-Team: English \n" -"MIME-Version: 1.0\n" -"Content-Type: text/plain; charset=UTF-8\n" -"Content-Transfer-Encoding: 8bit\n" - -#. $alerts -#: lib/Opsview/Web/Controller/Root.pm:492 -msgid "I have got %1 alerts" -msgstr "" - -#. $acknowledged -#: lib/Opsview/Web/Controller/Root.pm:492 -msgid "I have acknowledged %1 alerts" -msgstr "Yo dude, I've been working on these %1 alerts" - -#. $acknowledged -#: lib/Opsview/Web/Controller/Root.pm:492 -msgid "system.messages.arbitrary.unique.lexicon.key" -msgstr "" - diff --git a/dist/Locale-Maketext-Simple/t/po_with_i_default/fr.po b/dist/Locale-Maketext-Simple/t/po_with_i_default/fr.po deleted file mode 100644 index 8ecfbf761a..0000000000 --- a/dist/Locale-Maketext-Simple/t/po_with_i_default/fr.po +++ /dev/null @@ -1,30 +0,0 @@ -# Locale Maketext Simple language translations -# Copyright (C) All Perl Hackers everywhere -# Ton Voon , 2009. -# -msgid "" -msgstr "" -"Project-Id-Version: Locale Maketext Simple\n" -"POT-Creation-Date: YEAR-MO-DA HO:MI+ZONE\n" -"PO-Revision-Date: 2009-06-09 14:10+0000\n" -"Last-Translator: Ton Voon \n" -"Language-Team: French \n" -"MIME-Version: 1.0\n" -"Content-Type: text/plain; charset=UTF-8\n" -"Content-Transfer-Encoding: 8bit\n" - -#. $alerts -#: lib/Opsview/Web/Controller/Root.pm:492 -msgid "I have got %1 alerts" -msgstr "Mon Francais %1, c'est terrible" - -#. $acknowledged -#: lib/Opsview/Web/Controller/Root.pm:492 -msgid "I have acknowledged %1 alerts" -msgstr "" - -#. $acknowledged -#: lib/Opsview/Web/Controller/Root.pm:492 -msgid "system.messages.arbitrary.unique.lexicon.key" -msgstr "" - diff --git a/dist/Locale-Maketext-Simple/t/po_with_i_default/i_default.po b/dist/Locale-Maketext-Simple/t/po_with_i_default/i_default.po deleted file mode 100644 index 7327298688..0000000000 --- a/dist/Locale-Maketext-Simple/t/po_with_i_default/i_default.po +++ /dev/null @@ -1,30 +0,0 @@ -# Locale Maketext Simple language translations -# Copyright (C) All Perl Hackers everywhere -# Ton Voon , 2009. -# -msgid "" -msgstr "" -"Project-Id-Version: Locale Maketext Simple\n" -"POT-Creation-Date: YEAR-MO-DA HO:MI+ZONE\n" -"PO-Revision-Date: 2009-06-09 14:10+0000\n" -"Last-Translator: Ton Voon \n" -"Language-Team: English \n" -"MIME-Version: 1.0\n" -"Content-Type: text/plain; charset=UTF-8\n" -"Content-Transfer-Encoding: 8bit\n" - -#. $alerts -#: lib/Opsview/Web/Controller/Root.pm:492 -msgid "I have got %1 alerts" -msgstr "Maybe it's because I'm a %1 Londoner, that I love London tawn" - -#. $acknowledged -#: lib/Opsview/Web/Controller/Root.pm:492 -msgid "I have acknowledged %1 alerts" -msgstr "In idefault instead of en" - -#. $acknowledged -#: lib/Opsview/Web/Controller/Root.pm:492 -msgid "system.messages.arbitrary.unique.lexicon.key" -msgstr "This is the default message" - diff --git a/dist/Locale-Maketext-Simple/t/po_without_i_default/en.po b/dist/Locale-Maketext-Simple/t/po_without_i_default/en.po deleted file mode 100644 index 0d80b92ef5..0000000000 --- a/dist/Locale-Maketext-Simple/t/po_without_i_default/en.po +++ /dev/null @@ -1,30 +0,0 @@ -# Locale Maketext Simple language translations -# Copyright (C) All Perl Hackers everywhere -# Ton Voon , 2009. -# -msgid "" -msgstr "" -"Project-Id-Version: Locale Maketext Simple\n" -"POT-Creation-Date: YEAR-MO-DA HO:MI+ZONE\n" -"PO-Revision-Date: 2009-06-09 14:10+0000\n" -"Last-Translator: Ton Voon \n" -"Language-Team: English \n" -"MIME-Version: 1.0\n" -"Content-Type: text/plain; charset=UTF-8\n" -"Content-Transfer-Encoding: 8bit\n" - -#. $alerts -#: lib/Opsview/Web/Controller/Root.pm:492 -msgid "I have got %1 alerts" -msgstr "" - -#. $acknowledged -#: lib/Opsview/Web/Controller/Root.pm:492 -msgid "I have acknowledged %1 alerts" -msgstr "Yo dude, I've been working on these %1 alerts" - -#. $acknowledged -#: lib/Opsview/Web/Controller/Root.pm:492 -msgid "system.messages.arbitrary.unique.lexicon.key" -msgstr "" - diff --git a/dist/Locale-Maketext-Simple/t/po_without_i_default/fr.po b/dist/Locale-Maketext-Simple/t/po_without_i_default/fr.po deleted file mode 100644 index 8ecfbf761a..0000000000 --- a/dist/Locale-Maketext-Simple/t/po_without_i_default/fr.po +++ /dev/null @@ -1,30 +0,0 @@ -# Locale Maketext Simple language translations -# Copyright (C) All Perl Hackers everywhere -# Ton Voon , 2009. -# -msgid "" -msgstr "" -"Project-Id-Version: Locale Maketext Simple\n" -"POT-Creation-Date: YEAR-MO-DA HO:MI+ZONE\n" -"PO-Revision-Date: 2009-06-09 14:10+0000\n" -"Last-Translator: Ton Voon \n" -"Language-Team: French \n" -"MIME-Version: 1.0\n" -"Content-Type: text/plain; charset=UTF-8\n" -"Content-Transfer-Encoding: 8bit\n" - -#. $alerts -#: lib/Opsview/Web/Controller/Root.pm:492 -msgid "I have got %1 alerts" -msgstr "Mon Francais %1, c'est terrible" - -#. $acknowledged -#: lib/Opsview/Web/Controller/Root.pm:492 -msgid "I have acknowledged %1 alerts" -msgstr "" - -#. $acknowledged -#: lib/Opsview/Web/Controller/Root.pm:492 -msgid "system.messages.arbitrary.unique.lexicon.key" -msgstr "" - -- cgit v1.2.1