more bandaids
[spider.git] / cmd / forward / opername.pl
index 57af6505da02019d36283fed1d12fd8b2556cb5a..a80d0ec9e64329273efde7b434ac5467645cc93b 100644 (file)
@@ -31,7 +31,7 @@ foreach $call (@f) {
                my $node = $ref->homenode;
                my $latlong = DXBearing::lltos($lat, $long) if $lat && $long;
                if ($name) {
-                       my $l = DXProt::pc41($call, 1, $name);
+                       my $l = DXProt::pc41($DXProt::me, $call, 1, $name);
                        DXProt::eph_dup($l);
                        DXProt::broadcast_all_ak1a($l, $DXProt::me) ;
                }