From e06886c9a7200acf2ec1bee567dcb9513e3b3a08 Mon Sep 17 00:00:00 2001 From: kink Date: Wed, 18 Jul 2007 09:26:56 +0000 Subject: [PATCH] Sort output of readdir, as this is not by default. Thanks Tomas Kuliavas for finding this. git-svn-id: https://svn.code.sf.net/p/squirrelmail/code/trunk/squirrelmail@12554 7612ce4b-ef26-0410-bec9-ea0150e637f0 --- config/conf.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/config/conf.pl b/config/conf.pl index d98b9aff..2f667721 100755 --- a/config/conf.pl +++ b/config/conf.pl @@ -2770,7 +2770,7 @@ sub command_userThemes { print "\nStarting detection...\n\n"; opendir( DIR, "../css" ); - @files = readdir(DIR); + @files = sort(readdir(DIR)); $cnt = 0; while ( $cnt <= $#files ) { $filename = "../css/" . $files[$cnt] .'/'; @@ -2975,7 +2975,7 @@ sub command_iconSets { print "\nStarting detection...\n\n"; opendir( DIR, "../images/themes/" ); - @files = readdir(DIR); + @files = sort(readdir(DIR)); $cnt = 0; while ( $cnt <= $#files ) { $filename = "../images/themes/" . $files[$cnt] .'/'; @@ -3171,7 +3171,7 @@ sub command_templates { } elsif ( $input =~ /^\s*t\s*/i ) { print "\nStarting detection...\n\n"; opendir( DIR, "../templates" ); - @files = readdir(DIR); + @files = sort(readdir(DIR)); $cnt = 0; while ( $cnt <= $#files ) { if ( -d "../templates/" . $files[$cnt] && $files[$cnt] !~ /^\./ && $files[$cnt] ne "CVS" ) { -- 2.25.1