From a9f28e80e3936421f830bba0eacffd3bb509a9cb Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Fri, 25 Jun 2004 08:07:43 +0000
Subject: [PATCH] make sure that state and city are defined

---
 perl/Prefix.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl/Prefix.pm b/perl/Prefix.pm
index bc8a0edf..48206cea 100644
--- a/perl/Prefix.pm
+++ b/perl/Prefix.pm
@@ -481,7 +481,7 @@ sub cty_data
 	
 	my @dxcc = extract($call);
 	if (@dxcc) {
-		return ($dxcc[1]->dxcc, $dxcc[1]->itu, $dxcc[1]->cq, $dxcc[1]->state, $dxcc[1]->city);
+		return ($dxcc[1]->dxcc, $dxcc[1]->itu, $dxcc[1]->cq, ($dxcc[1]->state||''), ($dxcc[1]->city||''));
 	}
 	return (666,0,0,'','');		
 }
-- 
2.34.1