1. Ignore \n in ax25 mode for C client.

[spider.git] / perl / DXProt.pm

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 0a1c83ddbce0278dbac19abfa5fc76d4678096c0..0280793756c7556972f435bd897e64769adbe5ae 100644 (file)
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -247,7 +247,7 @@ sub normal
                        my $user = DXUser->get_current($spot[4]);
                        if ($user) {
                                my $qra = $user->qra;
-                               if (!DXBearing::is_qra) {
+                               unless ($qra && DXBearing::is_qra($qra)) {
                                        my $lat = $user->lat;
                                        my $long = $user->long;
                                        if (defined $lat && defined $long) {