Fixed message remembering.
This commit is contained in:
parent
36ec0c88b8
commit
d39a2f15e2
@ -434,6 +434,8 @@ sub fetchMessages {
|
||||
if ( !$Self->{Whitelist}{$Message->{message}{from}{id}} ) {
|
||||
$Self->{LogObject}
|
||||
->info( 'fetchMessages: User not whitelisted, skipping message ' . Dumper($MessageDataRaw) );
|
||||
|
||||
$Self->{MessageIDs}{$Message->{message}{message_id}} = 1;
|
||||
next MESSAGE;
|
||||
}
|
||||
if ($Self->{MessageIDs}{$Message->{message}{message_id}}) {
|
||||
@ -446,7 +448,7 @@ sub fetchMessages {
|
||||
$Self->processMessage( Message => $Message, );
|
||||
}
|
||||
}
|
||||
YAML::DumpFile('message_ids.yml', $Self->{MessageIDs});
|
||||
YAML::DumpFile("$FindBin::Bin/message_ids.yml", $Self->{MessageIDs});
|
||||
}
|
||||
|
||||
1;
|
||||
|
Loading…
Reference in New Issue
Block a user