diff --git a/federationhq_rcpt b/federationhq_rcpt index d0716fd..44a419b 100644 --- a/federationhq_rcpt +++ b/federationhq_rcpt @@ -75,13 +75,11 @@ sub createDSN sub updateTransactionWithRecipientInfo { - my $self = shift; - my $transaction = shift - my $sth = shift; + my ($self, $transaction, $sth) = @_; return unless $sth->rows == 1; - my $row = $th->fetchrow_hashref; + my $row = $sth->fetchrow_hashref; my $dovecot_server = $row->{dovecot_server}; my $username = $row->{username}; @@ -98,7 +96,7 @@ sub updateTransactionWithRecipientInfo return 0; } - my $row = $self->{fetch_dovecot_details_sth}->fetchrow_hashref(); + $row = $self->{fetch_dovecot_details_sth}->fetchrow_hashref(); my $hostname = $row->{hostname}; my $port = $row->{port};