reolink: switch reolinkip to ntpip

The value is used to set the NTP server for the cameras, so may as
call call it by a name that corresponds.

1 files changed, 5 insertions, 5 deletions

diff --git a/reolink/reolink b/reolink/reolink
index 1b0ca70..8a1a76b 100755
--- a/reolink/reolink
+++ b/reolink/reolink
@@ -97,8 +97,8 @@ sub load_params {
         $params->{spool_dir} = $value;
       } elsif ($key =~ m/^spool[-_]time$/ and $commands{spooltime}->{validate} ($value)) {
         $params->{spooltime} = $value;
-      } elsif ($key =~ m/^(?:reolink|camera)(?:_ip)?$/) {
-        $params->{reolink_ip} = $value;
+      } elsif ($key =~ m/^ntp(?:_ip)?$/) {
+        $params->{ntp_ip} = $value;
       } elsif ($key =~ m/^video(?:[-_]?times?)?$/ and $commands{video}->{validate} ($value)) {
         $params->{video} = $value;
       }
@@ -135,7 +135,7 @@ BEGIN {
 }
 
 my %server_params = (interval   => $interval,
-                     reolink_ip => '192.168.127.1',
+                     ntp_ip     => '192.168.127.1',
                      spooltime  => $spool_retention_time,
                      video      => $default_video_range);
 my $camera_host = '192.168.127.10';
@@ -171,7 +171,7 @@ sub save_params {
   print $fh "interval: $server_params{interval}\n";
   print $fh "spool_dir: $server_params{spool_dir}\n";
   print $fh "spool_time: $server_params{spooltime}\n";
-  print $fh "reolink_ip: $server_params{reolink_ip}\n";
+  print $fh "ntp_ip: $server_params{ntp_ip}\n";
   print $fh "video: $server_params{video}\n";
 
   close ($fh);
@@ -213,7 +213,7 @@ sub setup_reolink {
   $r->Login || die "Failed to login\n";
   $r->Errors (1);
 
-  $code = $r->SetNtp (1, $server_params{reolink_ip});
+  $code = $r->SetNtp (1, $server_params{ntp_ip});
   $code = $r->SetTime; # just enable DST
   $code = $r->SetOsd (0, 0, "Ay, Spy", "Upper Left", 0, "Upper Right");