diff options
Diffstat (limited to 'make/install-extras.pl')
| -rwxr-xr-x | make/install-extras.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/make/install-extras.pl b/make/install-extras.pl index f0e2dd0e2..ce77178e9 100755 --- a/make/install-extras.pl +++ b/make/install-extras.pl @@ -11,13 +11,13 @@ for my $dir (qw(src src/modules)) { next unless $file =~ /\.cpp$/; open CPP, '<', "$dir/$file" or die "Can't open $dir/$file to scan it: $!"; while (<CPP>) { - if (/\/\* \$CopyInstall: (\S+) (\S+) \*\//i) { - my($ifile, $idir) = ($1,$2); + if (/\/\* \$CopyInstall: (\S+) (\S+) (.*) \*\//i) { + my($ifile, $idir, $args) = ($1,$2,$3); next if exists $installed{$1.' '.$2}; $installed{$1.' '.$2}++; $idir =~ s/\$\(([^)]+)\)/$ENV{$1}/eg; if ($mode eq 'install') { - system "install $ifile $idir"; + system "install $args $ifile $idir"; } else { $ifile =~ s/.*\///g; system "rm $idir/$ifile"; |