r53578 - in /trunk/liblingua-es-numeros-perl: Changes META.yml debian/changelog debian/control debian/copyright lib/Lingua/ES/Numeros.pm

angelabad-guest at users.alioth.debian.org angelabad-guest at users.alioth.debian.org
Thu Mar 4 23:28:26 UTC 2010


Author: angelabad-guest
Date: Thu Mar  4 23:28:18 2010
New Revision: 53578

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=53578
Log:
New upstream release 0.08

Modified:
    trunk/liblingua-es-numeros-perl/Changes
    trunk/liblingua-es-numeros-perl/META.yml
    trunk/liblingua-es-numeros-perl/debian/changelog
    trunk/liblingua-es-numeros-perl/debian/control
    trunk/liblingua-es-numeros-perl/debian/copyright
    trunk/liblingua-es-numeros-perl/lib/Lingua/ES/Numeros.pm

Modified: trunk/liblingua-es-numeros-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/liblingua-es-numeros-perl/Changes?rev=53578&op=diff
==============================================================================
--- trunk/liblingua-es-numeros-perl/Changes (original)
+++ trunk/liblingua-es-numeros-perl/Changes Thu Mar  4 23:28:18 2010
@@ -1,4 +1,8 @@
 Revision history for Perl extension Lingua::ES::Numeros.
+
+0.08  Wed Mar  3 11:43:08 VET 2010
+    - Create tag :constants to import genre constants
+    - Documentation and examples fixes
 
 0.07  Wed Jan  6 00:14:36 VET 2010
     - Corrected fractional formating bug in real() thanks to Joaquin Ferrero

Modified: trunk/liblingua-es-numeros-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/liblingua-es-numeros-perl/META.yml?rev=53578&op=diff
==============================================================================
--- trunk/liblingua-es-numeros-perl/META.yml (original)
+++ trunk/liblingua-es-numeros-perl/META.yml Thu Mar  4 23:28:18 2010
@@ -1,22 +1,14 @@
 --- #YAML:1.0
-name:               Lingua-ES-Numeros
-version:            0.07
-abstract:           Translates numbers to spanish text
-author:
+name:                Lingua-ES-Numeros
+version:             0.08
+abstract:            Translates numbers to spanish text
+license:             ~
+author:              
     - Jose Rey <jrey at cpan.org>
-license:            unknown
-distribution_type:  module
-configure_requires:
-    ExtUtils::MakeMaker:  0
-build_requires:
-    ExtUtils::MakeMaker:  0
-requires:
-    Carp:  0
-no_index:
-    directory:
-        - t
-        - inc
-generated_by:       ExtUtils::MakeMaker version 6.55_02
+generated_by:        ExtUtils::MakeMaker version 6.42
+distribution_type:   module
+requires:     
+    Carp:                          0
 meta-spec:
-    url:      http://module-build.sourceforge.net/META-spec-v1.4.html
-    version:  1.4
+    url:     http://module-build.sourceforge.net/META-spec-v1.3.html
+    version: 1.3

Modified: trunk/liblingua-es-numeros-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/liblingua-es-numeros-perl/debian/changelog?rev=53578&op=diff
==============================================================================
--- trunk/liblingua-es-numeros-perl/debian/changelog (original)
+++ trunk/liblingua-es-numeros-perl/debian/changelog Thu Mar  4 23:28:18 2010
@@ -1,3 +1,10 @@
+liblingua-es-numeros-perl (0.08-1) unstable; urgency=low
+
+  * New upstream release
+  * Standards-Version 3.8.4 (no changes)
+
+ -- Angel Abad <angelabad at gmail.com>  Fri, 05 Mar 2010 00:27:50 +0100
+
 liblingua-es-numeros-perl (0.07-1) unstable; urgency=low
 
   * New upstream release

Modified: trunk/liblingua-es-numeros-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/liblingua-es-numeros-perl/debian/control?rev=53578&op=diff
==============================================================================
--- trunk/liblingua-es-numeros-perl/debian/control (original)
+++ trunk/liblingua-es-numeros-perl/debian/control Thu Mar  4 23:28:18 2010
@@ -7,7 +7,7 @@
 Uploaders: Gunnar Wolf <gwolf at debian.org>,
  gregor herrmann <gregoa at debian.org>,
  Damyan Ivanov <dmn at debian.org>, Angel Abad <angelabad at gmail.com>
-Standards-Version: 3.8.3
+Standards-Version: 3.8.4
 Homepage: http://search.cpan.org/dist/Lingua-ES-Numeros/
 Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/liblingua-es-numeros-perl/
 Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/liblingua-es-numeros-perl/

Modified: trunk/liblingua-es-numeros-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/liblingua-es-numeros-perl/debian/copyright?rev=53578&op=diff
==============================================================================
--- trunk/liblingua-es-numeros-perl/debian/copyright (original)
+++ trunk/liblingua-es-numeros-perl/debian/copyright Thu Mar  4 23:28:18 2010
@@ -12,8 +12,7 @@
  2006, Gunnar Wolf <gwolf at debian.org>
  2007, Damyan Ivanov <dmn at debian.org>
  2008, gregor herrmann <gregoa at debian.org>
- 2009, 2010, Angel Abad <angelabad at gmail.com>
- 2009, Angel Abad (Ikusnet SLL) <angel at grupoikusnet.com>
+ 2009-2010, Angel Abad <angelabad at gmail.com>
 License: Artistic or GPL-1+
 
 License: Artistic

Modified: trunk/liblingua-es-numeros-perl/lib/Lingua/ES/Numeros.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/liblingua-es-numeros-perl/lib/Lingua/ES/Numeros.pm?rev=53578&op=diff
==============================================================================
--- trunk/liblingua-es-numeros-perl/lib/Lingua/ES/Numeros.pm (original)
+++ trunk/liblingua-es-numeros-perl/lib/Lingua/ES/Numeros.pm Thu Mar  4 23:28:18 2010
@@ -5,13 +5,13 @@
 
 =head1 SYNOPSIS
 
-   use Lingua::ES::Numeros
-
-   $obj = new Lingua::ES::Numeros ('MAYUSCULAS' => 1)
-   print $obj->Cardinal(124856), "\n";
-   print $obj->Real(124856.531), "\n";
+   use Lingua::ES::Numeros ":constants";
+
+   my $obj = new Lingua::ES::Numeros ('MAYUSCULAS' => 1);
+   print $obj->cardinal(124856), "\n";
+   print $obj->real(124856.531), "\n";
    $obj->{GENERO} = FEMALE;
-   print $obj->Ordinal(124856), "\n";
+   print $obj->ordinal(124856), "\n";
 
 =head1 DESCRIPTION
 
@@ -37,13 +37,13 @@
 
 use Carp;
 
-our @ISA = qw();
-
-our $VERSION = '0.07';
-
-our @EXPORT = qw( MALE FEMALE NEUTRAL );
-
-our @EXPORT_OK = qw( MALE FEMALE NEUTRAL );
+use base qw( Exporter );
+
+our $VERSION = '0.08';
+
+our @EXPORT = qw( );
+our @EXPORT_OK = qw( MALE FEMALE NEUTRAL MASCULINO FEMENINO NEUTRO );
+our %EXPORT_TAGS = ( constants => [qw(MALE FEMALE NEUTRAL MASCULINO FEMENINO NEUTRO)] );
 
 # Perl 5.6 fails with this
 #use constant {
@@ -55,6 +55,10 @@
 use constant FEMALE  => 'a';
 use constant NEUTRAL => '';
 
+use constant MASCULINO => 'o';
+use constant FEMENINO  => 'a';
+use constant NEUTRO    => '';
+
 use fields qw/ ACENTOS MAYUSCULAS UNMIL HTML DECIMAL SEPARADORES GENERO
     POSITIVO NEGATIVO FORMATO /;
 
@@ -67,7 +71,7 @@
 
 Examples:
 
-      use Lingua::ES::Numeros;
+      use Lingua::ES::Numeros ':constants';
       
       # Use the fields' default values
       $obj = new Lingua::ES::Numeros; 
@@ -129,6 +133,9 @@
  | 3 | tres | tres | tres  | tercero | tercera | tercer  |
  +---+------+------+-------+---------+---------+---------+
 
+The constants MALE, FEMALE and NEUTRAL and their spanish counterparts MASCULINO,
+FEMENINO and NEUTRO, may be imported with the tag ":constants" on module use.
+
 =item SEXO
 
 Deprecated option only for backward compatibility, use GENERO instead.
@@ -162,9 +169,9 @@
 
 =head3 Aliases
 
-By popular demand I have added the following aliases for the options:
-
-    Alias        Natural Name
+All the options have the following english aliases.
+
+    English       Option name
     --------------------------
     ACCENTS       ACENTOS          
     UPPERCASE     MAYUSCULAS  




More information about the Pkg-perl-cvs-commits mailing list