Set an 'on_error' handler to NaMatrix so that server failures (e.g. 5…

…00 ISE) don't become process-wide fatal

mon.pl

@@ -44,6 +44,11 @@
 
 my $matrix = Net::Async::Matrix->new(
    server => $CONFIG->{homeserver},
+   # Just warn so errors don't become fatal to the process
+   on_error => sub {
+      my ( undef, $message ) = @_;
+      warn "NaMatrix failure: $message\n";
+   },
 );
 $loop->add( $matrix );