From: Mischa POSLAWSKY <perl@shiar.org>
Date: Tue, 14 Jul 2015 00:38:43 +0000 (+0200)
Subject: countries: append alias target in flag mode
X-Git-Tag: v1.8~45
X-Git-Url: http://git.shiar.nl/sheet.git/commitdiff_plain/be041e9b8be6b01b402028eec190265e21b3dd11

countries: append alias target in flag mode
---

diff --git a/countries.plp b/countries.plp
index 24be348..61a4795 100644
--- a/countries.plp
+++ b/countries.plp
@@ -33,6 +33,7 @@ my $cc = do 'countries.inc.pl';
 				next;
 			};
 			my ($name, $class, $short, $ref) = @$country;
+			$name .= " → $ref" if $ref;
 			$ref ||= $code;
 			local $_ = $ref;
 			if (exists $get{show}) {
@@ -41,7 +42,6 @@ my $cc = do 'countries.inc.pl';
 			}
 			else {
 				$_ = EscapeHTML($short || $name);
-				$name .= " → $ref" if $ref and $ref ne $code;
 			}
 			printf "\n".'<td class="%s" title="%s">%s',
 				$_ ? 'X '.$class : '', EscapeHTML("$code: $name"), $_;