From cade885d885bb6bb45532112f535e529cd2c884e Mon Sep 17 00:00:00 2001
From: Joe Taylor <k1jt@arrl.org>
Date: Mon, 22 Sep 2014 14:31:08 +0000
Subject: [PATCH] Fix a bug that can appear when unpacking compound callsigns.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@4343 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
---
 lib/unpackcall.f90 | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/unpackcall.f90 b/lib/unpackcall.f90
index 8ca1344b4..3b009b278 100644
--- a/lib/unpackcall.f90
+++ b/lib/unpackcall.f90
@@ -6,6 +6,7 @@ subroutine unpackcall(ncall,word,iv2,psfx)
   data c/'0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ '/
 
   word='......' 
+  psfx='    '
   n=ncall
   iv2=0
   if(n.ge.262177560) go to 20