@@ -27,6 +27,18 @@ my @client_program_files = (
27
27
' pg_isready' ,' pg_receivexlog' ,' pg_restore' ,' psql' ,
28
28
' reindexdb' ,' vacuumdb' ,@client_contribs );
29
29
30
+ sub SubstituteMakefileVariables {
31
+ local $_ =shift ;# Line to substitue
32
+ my $mf =shift ;# Makefile text
33
+ while (/ \$\( (\w +)\) / ) {
34
+ my $varname =$1 ;
35
+ if ($mf =~/ ^$varname \s *=\s *(.*)$ /mg ) {
36
+ my $varvalue =$1 ;
37
+ s /\$\( $varname\) / $varvalue / g ;
38
+ }
39
+ }
40
+ return $_ ;
41
+ }
30
42
sub lcopy
31
43
{
32
44
my $src =shift ;
@@ -494,8 +506,8 @@ sub CopySubdirFiles
494
506
}
495
507
496
508
$flist =' ' ;
497
- if ($mf =~/ ^DATA_built\s *=\s *(.*)$ /m ) {$flist .=$1 }
498
- if ($mf =~/ ^DATA\s *=\s *(.*)$ /m ) {$flist .=" $1 " }
509
+ if ($mf =~/ ^DATA_built\s *=\s *(.*)$ /m ) {$flist .=$1 ; }
510
+ if ($mf =~/ ^DATA\s *=\s *(.*)$ /m ) {$flist .=" $1 " ; }
499
511
$flist =~s / ^\s *// ;# Remove leading spaces if we had only DATA_built
500
512
501
513
if ($flist ne ' ' )
@@ -516,7 +528,7 @@ sub CopySubdirFiles
516
528
if ($flist ne ' ' )
517
529
{
518
530
$flist = ParseAndCleanRule($flist ,$mf );
519
-
531
+ print STDERR " Installing TSEARCH data for module $module : $flist \n " ;
520
532
foreach my $f (split /\s +/,$flist )
521
533
{
522
534
lcopy(" $subdir /$module /$f " ,
@@ -568,7 +580,7 @@ sub ParseAndCleanRule
568
580
substr ($flist , 0,index ($flist ,' $(addsuffix' ))
569
581
.substr ($flist ,$i + 1);
570
582
}
571
- return $flist ;
583
+ return SubstituteMakefileVariables( $flist , $mf ) ;
572
584
}
573
585
574
586
sub CopyIncludeFiles