Change commands used to set and goto presets. Fixes #3371

This commit is contained in:
Isaac Connor 2021-10-13 10:42:15 -04:00
parent 2056172ea9
commit 6fd33b4627
1 changed files with 2 additions and 2 deletions

View File

@ -283,7 +283,7 @@ sub presetSet
my $self = shift; my $self = shift;
my $params = shift; my $params = shift;
my $preset = $self->getParam( $params, 'preset' ); my $preset = $self->getParam( $params, 'preset' );
my $cmd = "cgi/ptz_set?Channel=1&Group=PTZCtrlInfo&PresetNumber=1&Preset=0"; my $cmd = 'form/presetSet?flag=3&existFlag=1&language=cn&presetNum='.$preset;
$self->sendCmd( $cmd ); $self->sendCmd( $cmd );
} }
@ -294,7 +294,7 @@ sub presetGoto
my $self = shift; my $self = shift;
my $params = shift; my $params = shift;
my $preset = $self->getParam( $params, 'preset' ); my $preset = $self->getParam( $params, 'preset' );
my $cmd = "cgi/ptz_set?Channel=1&Group=PTZCtrlInfo&PresetNumber=1&Preset=1"; my $cmd = 'form/presetSet?flag=4&existFlag=1&language=cn&presetNum='.$preset;
$self->sendCmd( $cmd ); $self->sendCmd( $cmd );
} }