{
$flist = ParseAndCleanRule($flist, $mf);
- # Special case for contrib/spi
- $flist = "autoinc.sql insert_username.sql moddatetime.sql refint.sql timetravel.sql"
- if ($d eq 'spi');
foreach my $f (split /\s+/,$flist)
{
lcopy('contrib/' . $d . '/' . $f,$target . '/share/contrib/' . basename($f))
$l = substr($l, 0, index($l, '$(addsuffix ')) . substr($l, $i+1);
}
- # Special case for contrib/spi
- $l = "autoinc.sql insert_username.sql moddatetime.sql refint.sql timetravel.sql"
- if ($n eq 'spi');
-
foreach my $d (split /\s+/, $l)
{
my $in = "$d.in";
my $cont = Project::read_file("contrib/$n/$in");
my $dn = $out;
$dn =~ s/\.sql$//;
- if ($mf =~ /^MODULE_big\s*=\s*(.*)$/m) { $dn = $1 }
$cont =~ s/MODULE_PATHNAME/\$libdir\/$dn/g;
my $o;
open($o,">contrib/$n/$out") || croak "Could not write to contrib/$n/$d";