diff --git a/F1DataBot.pm b/F1DataBot.pm index 9604baa..a049fa6 100644 --- a/F1DataBot.pm +++ b/F1DataBot.pm @@ -38,7 +38,7 @@ sub new { }; # load remembered update ids - $Self->{UpdateIDs} = YAML::LoadFile('update_ids.yml'); + $Self->{MessageIDs} = YAML::LoadFile('message_ids.yml'); return $Self; } @@ -393,17 +393,17 @@ sub fetchMessages { MESSAGE: for my $Message (@Messages) { - $Self->{LogObject}->info('fetchMessages: Calling processMessage'); - if ($Self->{UpdateIDs}{$Message->{update_id}}) { - $Self->{LogObject}->info('fetchMessages: Skipping known update_id'); + if ($Self->{MessageIDs}{$Message->{message}{message_id}}) { + $Self->{LogObject}->info('fetchMessages: Skipping known message_id'); next MESSAGE; } else { - $Self->{UpdateIDs}{$Message->{update_id}} = 1; + $Self->{LogObject}->info('fetchMessages: Calling processMessage'); + $Self->{MessageIDs}{$Message->{message}{message_id}} = 1; $Self->processMessage( Message => $Message, ); } } - YAML::DumpFile('update_ids.yml', $Self->{UpdateIDs}); + YAML::DumpFile('message_ids.yml', $Self->{MessageIDs}); } 1;