Changeset 477


Ignore:
Timestamp:
05/19/11 10:25:12 (13 years ago)
Author:
nanardon
Message:
  • automatically list availlable langage
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/Makefile.PL

    r476 r477  
    5454sub postamble { 
    5555     
    56     my @po = qw(de el es et fr it nl pl ro ru sv tr zh_TW); 
     56    # list availlable langages: 
     57    my @po = 
     58        map { m:lib/Epoll/I18N/([^\.]+)\.po$:; $1 } 
     59        glob('lib/Epoll/I18N/*.po'); 
    5760 
    5861    my $makepo = join("\n\n", map { 
Note: See TracChangeset for help on using the changeset viewer.