summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xclerk5
1 files changed, 3 insertions, 2 deletions
diff --git a/clerk b/clerk
index b5e7576..02bc14c 100755
--- a/clerk
+++ b/clerk
@@ -314,9 +314,10 @@ sub formatted_albums {
for my $k (@skeys) {
my @vals = ((map { $_ // "Unknown" } $uniq_albums{$k}->@{qw/AlbumArtist Date Album/}), $uniq_albums{$k}->{Dir});
my $strval = sprintf $fmtstr."%s\n", @vals;
- @albums = sort @albums;
+ if (! $sorted) {
+ @albums = sort @albums;
+ }
push @albums, $strval;
-
}
return \@albums;