From e12684676deb425c533e895b5ae63b2b2e2b6891 Mon Sep 17 00:00:00 2001
From: djk <djk>
Date: Tue, 19 Jan 1999 10:31:10 +0000
Subject: [PATCH] added mycall to locally generated spots in spot database

---
 cmd/dx.pl    | 2 +-
 perl/Spot.pm | 1 -
 2 files changed, 1 insertion(+), 2 deletions(-)

diff --git a/cmd/dx.pl b/cmd/dx.pl
index 41c71c07..3a3d6cf0 100644
--- a/cmd/dx.pl
+++ b/cmd/dx.pl
@@ -81,7 +81,7 @@ return (1, @out) if !$valid;
 $line =~ s/\^/:/og;
 
 # Store it here
-if (Spot::add($freq, $spotted, $main::systime, $line, $spotter)) {
+if (Spot::add($freq, $spotted, $main::systime, $line, $spotter, $main::mycall)) {
 	# send orf to the users
 	my $buf = Spot::formatb($freq, $spotted, $main::systime, $line, $spotter);
 	DXProt::broadcast_users($buf, 'dx', $buf);
diff --git a/perl/Spot.pm b/perl/Spot.pm
index efdf16ed..3bc643cb 100644
--- a/perl/Spot.pm
+++ b/perl/Spot.pm
@@ -57,7 +57,6 @@ sub add
 	push @out, (@dxcc > 0 ) ? $dxcc[1]->dxcc() : 0;
 	push @out, $spot[5];
 	
-
 	my $buf = join("\^", @out);
 
 	# compare dates to see whether need to open another save file (remember, redefining $fp 
-- 
2.43.0