mirror of
https://github.com/vincentmli/bpfire.git
synced 2026-04-09 18:45:54 +02:00
country.cgi: Use own location-functions.
Signed-off-by: Stefan Schantl <stefan.schantl@ipfire.org> Signed-off-by: Michael Tremer <michael.tremer@ipfire.org>
This commit is contained in:
committed by
Michael Tremer
parent
d443f504aa
commit
cb204ea100
@@ -21,8 +21,6 @@
|
||||
|
||||
use strict;
|
||||
|
||||
use Locale::Codes::Country;
|
||||
|
||||
my $col;
|
||||
my $lines = '1';
|
||||
my $lines2 = '';
|
||||
@@ -32,6 +30,8 @@ require "${General::swroot}/location-functions.pl";
|
||||
require "${General::swroot}/lang.pl";
|
||||
require "${General::swroot}/header.pl";
|
||||
|
||||
require "${General::swroot}/location-functions.pl";
|
||||
|
||||
&Header::showhttpheaders();
|
||||
|
||||
&Header::openpage($Lang::tr{'countries'}, 1, '');
|
||||
@@ -52,8 +52,11 @@ print<<END;
|
||||
</tr>
|
||||
END
|
||||
|
||||
# Init libloc database connection.
|
||||
my $db_handle = &Location::Functions::init();
|
||||
|
||||
# Get a list of all supported country codes.
|
||||
my @countries = Locale::Codes::Country::all_country_codes();
|
||||
my @countries = &Location::database_countries($db_handle);
|
||||
|
||||
# Loop through whole country list.
|
||||
foreach my $country (@countries) {
|
||||
|
||||
Reference in New Issue
Block a user