]> git.sesse.net Git - ccbs/blob - intl/make-season-pot.pl
Support odd/even theming for top5/top10.
[ccbs] / intl / make-season-pot.pl
1 #! /usr/bin/perl
2 use strict;
3 use warnings;
4 use ccbs;
5
6 my $dbh = ccbs::db_connect();
7 my $seasons = ccbs::db_fetch_all($dbh, 'SELECT seasonname FROM seasons');
8 my $date = `date +"%Y-%M-%d %H:%M%z"`;   # pah :-)
9 chomp $date;
10
11 print <<"EOF";
12 # ccbs template file for seasons
13 msgid ""
14 msgstr ""
15 "Project-Id-Version: ccbs\\n"
16 "Report-Msgid-Bugs-To: \\n"
17 "POT-Creation-Date: $date\\n"
18 "MIME-Version: 1.0\\n"
19 "Content-Type: text/plain; charset=utf-8\\n"
20 "Content-Transfer-Encoding: 8bit\\n"
21
22 EOF
23
24 for my $s (@$seasons) {
25         my $n = $s->{'seasonname'};
26         print "msgid \"$n\"\n";
27         print "msgstr \"\"\n\n";
28 }
29
30 print "# eof\n";