From 1a8ddad3078521d2863fca96d77b5e23eeea4ac6 Mon Sep 17 00:00:00 2001
From: Steve Franke <s.j.franke@icloud.com>
Date: Mon, 24 Dec 2018 11:19:07 -0600
Subject: [PATCH] In ft8apset, mycall and dxcall must be at least 3 characters
 long, otherwise they are treated as non-existent.

---
 lib/ft8/ft8apset.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/ft8/ft8apset.f90 b/lib/ft8/ft8apset.f90
index 2e85029e0..56a18c4fe 100644
--- a/lib/ft8/ft8apset.f90
+++ b/lib/ft8/ft8apset.f90
@@ -14,7 +14,7 @@ subroutine ft8apset(mycall12,hiscall12,apsym)
 
   nohiscall=.false. 
   hiscall=hiscall12 
-  if(len(trim(hiscall)).eq.0) then
+  if(len(trim(hiscall)).lt.3) then
      hiscall=mycall12  ! use mycall for dummy hiscall - mycall won't be hashed.
      nohiscall=.true.
   endif