From ac816c09b23233c9e3de0f1b12cc905a921ca85a Mon Sep 17 00:00:00 2001 From: Derf Null Date: Wed, 24 May 2023 21:36:06 +0200 Subject: rename get_privacy_by_name to get_privacy_by, allow requests by uid --- lib/Travelynx/Model/Users.pm | 24 +++++++++++++----------- 1 file changed, 13 insertions(+), 11 deletions(-) (limited to 'lib/Travelynx/Model/Users.pm') diff --git a/lib/Travelynx/Model/Users.pm b/lib/Travelynx/Model/Users.pm index af2a6dc..67296ca 100644 --- a/lib/Travelynx/Model/Users.pm +++ b/lib/Travelynx/Model/Users.pm @@ -154,19 +154,21 @@ sub get_uid_by_name_and_mail { return; } -sub get_privacy_by_name { +sub get_privacy_by { my ( $self, %opt ) = @_; - my $db = $opt{db} // $self->{pg}->db; - my $name = $opt{name}; + my $db = $opt{db} // $self->{pg}->db; - my $res = $db->select( - 'users', - [ 'id', 'public_level' ], - { - name => $name, - status => 1 - } - ); + my %where; + + if ( $opt{name} ) { + $where{name} = $opt{name}; + } + else { + $where{id} = $opt{uid}; + } + + my $res = $db->select( 'users', [ 'id', 'public_level' ], + { %where, status => 1 } ); if ( my $user = $res->hash ) { return { -- cgit v1.2.3