#!/usr/bin/env perl
use strict;
use warnings;
use HTML::Latemp::GenMakeHelpers ();
use Cwd (qw(getcwd));
my $generator =
HTML::Latemp::GenMakeHelpers->new(
'hosts' =>
[ map {
+{ 'id' => $_, 'source_dir' => $_,
'dest_dir' => "\$(ALL_DEST_BASE)/$_-homepage"
}
} (qw(common t2 vipe)) ],
);
$generator->process_all();
use IO::All qw/ io /;
my $text = io("include.mak")->slurp();
$text =~ s!^(T2_DOCS = .*)humour/fortunes/index.html!$1!m;
io("include.mak")->print($text);
# This is to in order to generate the t2/humour/fortunes/arcs-list.mak
# file, which is inclduded by the makefile.
{
my $orig_dir = getcwd();
chdir("t2/humour/fortunes");
system("make", "dist");
chdir($orig_dir);
}