Subject: | on_read_receipt content is not json_decoded |
Date: | Tue, 18 Jun 2019 12:49:12 +0200 |
To: | bug-Net-Async-Matrix [...] rt.cpan.org |
From: | grin <grin [...] grin.hu> |
Hello,
Your example chokes on
on_read_receipt => sub {
my ( $room, $member, $event_id, $content ) = @_;
use Data::Dumper;
&d("read rcpt;" . Dumper(\%NO, $room, $member, $event_id, $content));
return if $NO{receipt};
print_event( read_receipt => {
room_id => $room->room_id,
user_id => $member->user->user_id,
event_id => $event_id,
ts => $content->{ts},
since $content is a json text, not a hashref.
Can't use string ("{"ts": 1553441073484}") as a HASH ref while "strict refs" in use at ./events.pl line 96.
g