Sort recordings secondarily by date when sorting by name.

Makes the ordering stabler for multiple recordings with the same name.

1 files changed, 4 insertions, 2 deletions

diff --git a/vdradmind.pl b/vdradmind.pl
index 2a73a2c..e762347 100755
--- a/vdradmind.pl
+++ b/vdradmind.pl
@@ -6053,11 +6053,13 @@ sub rec_list {
         if ($CONFIG{REC_DESC}) {
             @recordings = sort({ $b->{isfolder} <=> $a->{isfolder} ||
                                  lc($b->{isfolder} ? $b->{name} : "") cmp lc($a->{isfolder} ? $a->{name} : "") ||
-                                 lc($b->{name}) cmp lc($a->{name}) } @recordings);
+                                 lc($b->{name}) cmp lc($a->{name}) ||
+                                 $b->{sse} <=> $a->{sse} } @recordings);
         } else {
             @recordings = sort({ $b->{isfolder} <=> $a->{isfolder} ||
                                  lc($b->{isfolder} ? $a->{name} : "") cmp lc($a->{isfolder} ? $b->{name} : "") ||
-                                 lc($a->{name}) cmp lc($b->{name}) } @recordings);
+                                 lc($a->{name}) cmp lc($b->{name}) ||
+                                 $a->{sse} <=> $b->{sse} } @recordings);
         }
     } elsif ($CONFIG{REC_SORTBY} eq "date") {
         if ($CONFIG{REC_DESC}) {