kensanata / sitelen-mute

a static image gallery creator
https://alexschroeder.ch/software/Sitelen_Mute
GNU General Public License v3.0
75 stars 7 forks source link

Reverse sort (-r) does not work #26

Open kurld opened 2 years ago

kurld commented 2 years ago

Sort order is always ascending, even when -r is used. That's because:

1101: $adata = [ reverse @$adata ] if $revsort;

is overwriten by:

509: $j->{data} = [ sort { $a->{stamp} <=> $b->{stamp} } @{$jh->{data}}, @$ja ];

when called:

1161:write_json(catfile($absOut, 'data.json'), \%json, $odata->{data});