Configs classées dans l'ordre chronologique de création (=modification)

des fichiers associés.

1 files changed, 2 insertions, 0 deletions

diff --git a/ivybanner b/ivybanner
index c5a4476..0523cd6 100644
--- a/ivybanner
+++ b/ivybanner
@@ -383,7 +383,9 @@ sub demosframe {
     my @file_liste = grep /:/, readdir PREFIX;
     closedir PREFIX;
     my @cleanfilelist = ();
+    @file_liste = sort { (stat("$path/$a"))[10] <=> (stat("$path/$b"))[10] } @file_liste;
     foreach my $file (@file_liste) {
+	print "file=$file mtime=", (stat("$path/$file"))[10] ,"\n";
 	next unless (-f $path."/".$file);
 	next if ($file =~ /\~$/);
 	next if ($file =~ /^\./);