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