Insteon: Catch Multiple Calls to Set_Receive in the Same Pass

Resolves one of the three loopholes discovered by @peloy which permitted duplicate messages received in the same pass to be processed.

Hopefully the final fix for hollie#169

lib/Insteon/BaseInsteon.pm

@@ -291,7 +291,8 @@ sub set_receive
 	my ($self, $p_state, $p_setby, $p_response) = @_;
 	my $curr_milli = sprintf('%.0f', &main::get_tickcount);
 	my $window = 1000;
-	if ($p_state eq $self->state && ($curr_milli - $$self{set_milliseconds} < $window)){
+	if (($p_state eq $self->state || $p_state eq $self->state_final)
+		&& ($curr_milli - $$self{set_milliseconds} < $window)){
 		::print_log("[Insteon::BaseObject] Ignoring duplicate set " . $p_state .
 			" state command for " . $self->get_object_name . " received in " .
 			"less than $window milliseconds") if $main::Debug{insteon};