Support non-fixed sheets and messages to sync.

[skvidarsync] / www / event.pl

diff --git a/www/event.pl b/www/event.pl
index 04e7cdaa5ab11fb252bd3f92bcc86d3270469582..c99da216af9df343724de87f9a5a023d1b3ee62b 100755 (executable)
--- a/www/event.pl
+++ b/www/event.pl
@@ -51,7 +51,7 @@ if (exists($json->{'event'}) && exists($json->{'event'}{'type'})) {
                        # TODO: What if edits happen out-of-order?
                        my $date = $1;
                        my $channel = $json->{'event'}{'channel'};
-                       my $ts = $json->{'event'}{'ts'};
+                       my $ts = $json->{'event'}{'message'}{'ts'};
                        print "Matching message {$channel, $ts} to date $date\n";
                        $dbh->do('INSERT INTO message_sheet_link (channel, ts, sheet_title) VALUES (?,?,?)', undef,
                                $channel, $ts, $date);