#! /bin/sh

set -e

get_maintainer() {
    # This is just easier in perl!
    perl <<'EOF'
use warnings;
use strict;
use Mail::Address;
use Dpkg::Control::Info;
print $_->address() foreach Mail::Address->parse(${Dpkg::Control::Info->new()->get_source()}->{'fields'}->{'Maintainer'});
EOF
}

if [ -d debian/po ]
then
    [ -z "$(git diff --name-only --diff-filter=U -- debian/*.templates)" ] || {
	echo 'Fix merge of debian/*.templates first'
	exit 1
    }

    source_package=$(dpkg-parsechangelog -S Source)
    # Export for use in debconf-updatepo(1)
    export source_package
    maintainer=$(get_maintainer)

    cd debian/po

    git checkout --theirs -- *.po

    debconf-updatepo --verbose "--msgid-bugs-address=$maintainer"

    for po in *.po
    do
	msgfilter -i "$po" -o "$po.new" --keep-header sed -e 's/\b\([dD]\)ebian\b/\1evuan/g'
	if [ -f "$po.new" ]
	   then
	       mv "$po.new" "$po"
	fi
    done
fi
