X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/d96b16650836046f79dc76641681445f97bd60ce..0a4467b6f8bba70f70d3e6f439db55b507a416ea:/countries.plp diff --git a/countries.plp b/countries.plp index cd2040d..3019a29 100644 --- a/countries.plp +++ b/countries.plp @@ -40,9 +40,8 @@ my $cc = do 'countries.inc.pl'; $_ = sprintf '%s', $img, $ref if -e $img; } else { - $_ = $short || $name; + $_ = EscapeHTML($short || $name); } - $name =~ s/([^,]*), (.*)/$2 $1/; printf "\n".'%s', $_ ? 'X '.$class : '', EscapeHTML("$code: $name"), $_; } @@ -63,7 +62,9 @@ my $cc = do 'countries.inc.pl'; oceania south america north america - reserved + reserved + free + unused user-assigned