[Bexley][Whitespace] Use combination of LogID + Reason for unique logs

LogID isn't unique, a report of Food - Not Out and Paper & Card - Not
Out results in two log entries which both have the same LogID, but
different reasons, so use the reason when making logs unique.

Also adds an extra check to ensure the round matches when looking for
relevant logs.

perllib/FixMyStreet/Cobrand/Bexley/Waste.pm

@@ -233,7 +233,7 @@ sub bin_services_for_address {
         $filtered_service->{report_locked_out_reason} = '';
         my $log_reason_prefix = $self->get_in_cab_logs_reason_prefix($filtered_service->{service_id});
         if ($log_reason_prefix) {
-            my @relevant_logs = grep { $_->{reason} =~ /^$log_reason_prefix/ } @$property_logs;
+            my @relevant_logs = grep { $_->{reason} =~ /^$log_reason_prefix/ && $_->{round} eq $filtered_service->{round} } @$property_logs;
             if (@relevant_logs) {
                 $filtered_service->{report_locked_out} = 1;
                 $filtered_service->{report_locked_out_reason} = $relevant_logs[0]->{reason};
@@ -381,9 +381,9 @@ sub _in_cab_logs {
 
         $cab_logs = [ @$cab_logs_uprn, @$cab_logs_usrn ];
 
-        # Make cab logs unique by LogID
+        # Make cab logs unique by LogID and Reason
         my %seen;
-        @$cab_logs = grep { !$seen{ $_->{LogID} }++ } @$cab_logs;
+        @$cab_logs = grep { !$seen{ $_->{LogID} . $_->{Reason} }++ } @$cab_logs;
 
         $self->{c}->stash->{cab_logs} = $cab_logs;
     } else {

t/app/controller/waste_bexley.t

@@ -1032,7 +1032,7 @@ sub _in_cab_logs {
             Usrn => '321',
         },
         {
-            LogID => 2,
+            LogID => 1,
             Reason => 'N/A',
             RoundCode => 'RND-6',
             LogDate => '2024-03-28T06:10:09.417',