Add missing Monitor() function.

2020-12-14 14:41:34 -05:00 · 2020-12-14 14:41:34 -05:00 · 9fec11c4a9
parent bc07c38dc8
commit 9fec11c4a9
1 changed files with 9 additions and 0 deletions
--- a/scripts/ZoneMinder/lib/ZoneMinder/Event.pm
+++ b/scripts/ZoneMinder/lib/ZoneMinder/Event.pm
@ -915,6 +915,15 @@ sub canEdit {
  return 0;
 } # end sub canEdit

+sub Monitor {
+  my $self = shift;
+  $$self{Monitor} = shift if @_;
+  if ( !$$self{Monitor} ) {
+    $$self{Monitor} = new ZoneMinder::Monitor($$self{MonitorId});
+  }
+  return $$self{Monitor};
+}
+
 1;
 __END__