X-Git-Url: http://git.ipfire.org/?a=blobdiff_plain;f=html%2Fcgi-bin%2Fcountry.cgi;h=76035fb46d76ad0c4775e300e8d4c975dcc2b36f;hb=326a764de66971d2c78d2e45225d8985ca4ac3be;hp=db6c07496d6e6d8169c855d8be1d0d3dfa804358;hpb=82a4a102f3eaa4d1d706a654cb940596714871d2;p=people%2Fteissler%2Fipfire-2.x.git diff --git a/html/cgi-bin/country.cgi b/html/cgi-bin/country.cgi index db6c07496..76035fb46 100644 --- a/html/cgi-bin/country.cgi +++ b/html/cgi-bin/country.cgi @@ -36,18 +36,18 @@ require "${General::swroot}/header.pl"; &Header::showhttpheaders(); -&Header::openpage('Country Codes', 1, ''); -&Header::openbigbox('100%', 'LEFT'); - -&Header::openbox('100%', 'LEFT', 'Flags & Country Codes:'); -print ""; -print ""; -print ""; -print ""; -print ""; -print ""; -print ""; -print ""; +&Header::openpage($Lang::tr{'countries'}, 1, ''); +&Header::openbigbox('100%', 'left'); + +&Header::openbox('100%', 'left', $Lang::tr{'country codes and flags'}); +print "
FlagCode$Lang::tr{'country'} FlagCode$Lang::tr{'country'}
"; +print ""; +print ""; +print ""; +print ""; +print ""; +print ""; +print ""; @flaglist = <$flagdir/*>; @@ -69,39 +69,34 @@ foreach $flag (@flaglistfiles) if($fcode eq 'tp') { $country = 'East Timor'; } if($fcode eq 'yu') { $country = 'Yugoslavia'; } if ($lines % 2) { - print ""; print ""; print "\n"; -} -else { - $lines2++; - if($lines2 % 2) { - print ""; - $col="bgcolor='${Header::table2colour}'"; - } else { - print ""; - $col="bgcolor='${Header::table1colour}'"; } - print ""; - print ""; - print ""; + else { + $lines2++; + if($lines2 % 2) { + $col="style='background-color:${Header::table2colour};'"; + } else { + $col="style='background-color:${Header::table1colour};'"; + } + print ""; + print ""; + print ""; + print ""; + print ""; } } -print "
$Lang::tr{'flag'}$Lang::tr{'countrycode'}$Lang::tr{'country'} $Lang::tr{'flag'}$Lang::tr{'countrycode'}$Lang::tr{'country'}
$flagcode"; + print "$flagcode$flagcode$country
$flagcode"; - print "$flagcode$country 
$flagcode$flagcode$country 
"; +print ""; &Header::closebox(); &Header::closebigbox(); print < - - - - -
$Lang::tr{'back'}
+
+$Lang::tr{'back'}
END ;