diff options
| -rw-r--r-- | perl/lib/Wallet/ACL.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl/lib/Wallet/ACL.pm b/perl/lib/Wallet/ACL.pm index 58e33b4..5b949e9 100644 --- a/perl/lib/Wallet/ACL.pm +++ b/perl/lib/Wallet/ACL.pm @@ -1,7 +1,7 @@ # Wallet::ACL -- Implementation of ACLs in the wallet system # # Written by Russ Allbery <eagle@eyrie.org> -# Copyright 2016 Russ Allbery <eagle@eyrie.org> +# Copyright 2016, 2020 Russ Allbery <eagle@eyrie.org> # Copyright 2007-2008, 2010, 2013-2015 # The Board of Trustees of the Leland Stanford Junior University # @@ -438,7 +438,7 @@ sub history { eval { my $guard = $self->{schema}->txn_scope_guard; my %search = (ah_acl => $self->{id}); - my %options = (order_by => 'ah_on'); + my %options = (order_by => { -asc => [qw/ah_on ah_id/] }); my @data = $self->{schema}->resultset('AclHistory') ->search (\%search, \%options); for my $data (@data) { |