Changeset 19246 for lang/perl

Timestamp:

09/12/08 23:38:26 (5 years ago)

Author:

hanekomu

Message:

added PEPL, ZEYA

Location:

lang/perl/Acme-CPANAuthors-Austrian/trunk

Files:

• lib/Acme/CPANAuthors/Austrian.pm (modified) (1 diff)
• t/01_misc.t (modified) (1 diff)

lang/perl/Acme-CPANAuthors-Austrian/trunk/lib/Acme/CPANAuthors/Austrian.pm

@@ -12 +12 @@
     FLORIAN  => 'Florian Helmberger',
     GARGAMEL => 'Karlheinz Zöchling',
-    LAMMEL   =>'Roland Lammel',
+    LAMMEL   => 'Roland Lammel',
     MARCEL   => 'Marcel Gruenauer == hanekomu',
     MAROS    => 'Maroš Kollár',
+    PEPL     => 'Michael Kröll',
     RGIERSIG => 'Roland Giersig',
+    ZEYA     => 'Hansjörg Pehofer',
 );
 

lang/perl/Acme-CPANAuthors-Austrian/trunk/t/01_misc.t

@@ -9 +9 @@
 
 my $authors = Acme::CPANAuthors->new('Austrian');
-is($authors->count, 7, 'number of authors');
+is($authors->count, 9, 'number of authors');
 eq_or_diff [ sort $authors->id ], [ qw(
-    DOMM FLORIAN GARGAMEL LAMMEL MARCEL MAROS RGIERSIG
+    DOMM FLORIAN GARGAMEL LAMMEL MARCEL MAROS PEPL RGIERSIG ZEYA
 ) ], 'author IDs';