Sorting files in l10n.pl to get the same order always

diff --git a/l10n/l10n.pl b/l10n/l10n.pl
index fb1b522c25521787847c024388233a295637c15e..27b14c41bef90970a74263a2b35921d9d93ccf32 100644 (file)
--- a/l10n/l10n.pl
+++ b/l10n/l10n.pl
@@ -12,6 +12,7 @@ sub crawlPrograms{
        opendir( DIR, $dir );
        my @files = readdir( DIR );
        closedir( DIR );
+       @files = sort( @files );
 
        foreach my $i ( @files ){
                next if substr( $i, 0, 1 ) eq '.';
@@ -33,9 +34,11 @@ sub crawlFiles{
        opendir( DIR, $dir );
        my @files = readdir( DIR );
        closedir( DIR );
+       @files = sort( @files );
 
        foreach my $i ( @files ){
                next if substr( $i, 0, 1 ) eq '.';
+               next if $i eq 'l10n';
                
                if( -d $dir.'/'.$i ){
                        push( @found, crawlFiles( $dir.'/'.$i ));