add require Filter and fix missing $
This commit is contained in:
parent
4d87b49f07
commit
1c1630e5b4
|
@ -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
|
||||||
|
|
Loading…
Reference in New Issue