#!/usr/bin/env perl
use strict;

=for instructions

This script is used to merge cobrand po files with the main
FixMyStreet po file. It should be run after generate_cobrand_po
and once the cobrand po files with translations are placed in the
language directories.

It will then create an autoCobrand.po file for each language that
has a Cobrand.po

=cut

my $cobrand = shift;

die "Please provide a cobrand name\n" unless $cobrand;

# for each language create a .po file with an existing translations
for (glob( 'locale/*/LC_MESSAGES' ) ) {
    my $fms = "$_/FixMyStreet.po";
    my $cobrand_po = "$_/$cobrand.po";
    my $out = "$_/auto$cobrand.po";
    if ( -e $cobrand_po and -e $fms ) {
        print "$_\n";
        system("msgcat --use-first --no-wrap -o $out $fms $cobrand_po");
    }
}