X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcreate_prefix.pl;h=d4d2aa204a89904cf6936a2dc7eedea596330fb9;hb=fcd883534914eccdcd54e5ff8c5d998fa28cb788;hp=d87cf14412ec357701757943e0ae7ce318006617;hpb=7d4b15681464d77945e7ea78ef60ed3305d57d95;p=spider.git

diff --git a/perl/create_prefix.pl b/perl/create_prefix.pl
index d87cf144..d4d2aa20 100755
--- a/perl/create_prefix.pl
+++ b/perl/create_prefix.pl
@@ -180,8 +180,8 @@ foreach my $l (sort {$a <=> $b} keys %locn) {
 	print OUT " cq => $cq,";
 	print OUT " utcoff => $utcoff,";
 	print OUT " lat => $latd,";
-	print OUT " long => $longd";
-	print OUT " qra => $qra";
+	print OUT " long => $longd,";
+	print OUT " qra => '$qra'";
 	print OUT " }, 'Prefix'),\n";
 }
 print OUT ");\n\n";