]> dxcluster.net Git - spider.git/commitdiff
fix new RBN spot typos
authorDirk Koopman <djk@tobit.co.uk>
Sun, 21 Jun 2020 14:05:55 +0000 (15:05 +0100)
committerDirk Koopman <djk@tobit.co.uk>
Sun, 21 Jun 2020 14:05:55 +0000 (15:05 +0100)
perl/RBN.pm

index 8cebcbf3e8cda55b6ed51f5cfd9e18146cf8430b..b78e9d4be24cffc77f45730580a49936b9321e38 100644 (file)
@@ -259,8 +259,8 @@ sub normal
                # create record and add into the buildup
                my $r = [$origin, nearest(.1, $qrg), $call, $mode, $s, $t, $utz, $respot, $u];
                dbg("RBN: key: '$sp' ADD RECORD call: $call qrg: $qrg origin: $origin") if isdbg('rbn');
-               my @s =  Spot::prepare($r->[1], $r->[2], $r->[6], $comment, $r->[0]);
-               $r-[9] = \@s';
+               my @s =  Spot::prepare($r->[1], $r->[2], $r->[6], '', $r->[0]);
+               $r->[9] = \@s;
 
                push @$spot, $r;