Shape text using Pango and HarfBuzz; gives us nice ligatures and exotic scripts.

[ccbs] / html / tournaments.pl

diff --git a/html/tournaments.pl b/html/tournaments.pl
index 169d84d1b1c1b0c253b0558433ee05d39a71bc68..aedd416dbef607efc77d54dbd010c2a74c0119c9 100755 (executable)
--- a/html/tournaments.pl
+++ b/html/tournaments.pl
@@ -5,7 +5,16 @@ use strict;
 use warnings;
 
 my $dbh = ccbs::db_connect();
-my $tournaments = ccbs::db_fetch_all($dbh, 'SELECT * FROM tournaments NATURAL JOIN seasons ORDER BY season, date');
+my $tournaments = ccbs::db_fetch_all($dbh, 'SELECT * FROM tournaments NATURAL JOIN seasons ORDER BY season, date, tournamentname');
+
+# Translate the season names
+my @t_trans = ();
+for my $t (@$tournaments) {
+       my %tt = %$t;
+       $tt{'seasonname'} = Locale::gettext::gettext($t->{'seasonname'});
+       push @t_trans, \%tt;
+}
 
 ccbs::print_header();
-ccbs::process_template('tournaments.tmpl', 'Turneringer', { tournaments => $tournaments });
+ccbs::process_template('tournaments.tmpl', _('Tournaments'), { tournaments => \@t_trans });
+$dbh->disconnect;