add require Filter and fix missing $

This commit is contained in:
Isaac Connor 2022-02-01 17:23:16 -05:00
parent 4d87b49f07
commit 1c1630e5b4
1 changed files with 2 additions and 1 deletions

View File

@ -34,6 +34,7 @@ use bytes;
use ZoneMinder; use ZoneMinder;
use ZoneMinder::Monitor; use ZoneMinder::Monitor;
use ZoneMinder::State; use ZoneMinder::State;
use ZoneMinder::Filter;
use DBI; use DBI;
use POSIX; use POSIX;
use Time::HiRes qw/gettimeofday/; use Time::HiRes qw/gettimeofday/;
@ -130,7 +131,7 @@ if ( $command eq 'state' ) {
or or
($monitor->{Recording} ne $definition->{Recording}) ($monitor->{Recording} ne $definition->{Recording})
) { ) {
$monitor->save({ map { $_ => $definition{$_} } qw(Capturing Analysing Recording) }); $monitor->save({ map { $_ => $$definition{$_} } qw(Capturing Analysing Recording) });
last; # definition last; # definition
} # end if } # end if
} # end foreach definition } # end foreach definition