Re: [patch@31988] Revised Module::Build fixes for VMS.

From: "John E. Malmberg" <wb8tyw@qsl.net>
	Message-id: <46FEAC8D.1080506@qsl.net>

Missed one case in #31995.

p4raw-id: //depot/perl@31998

diff --git a/lib/Module/Build/Base.pm b/lib/Module/Build/Base.pm
index 3462505..519fe00 100644 (file)
--- a/lib/Module/Build/Base.pm
+++ b/lib/Module/Build/Base.pm
@@ -2247,7 +2247,7 @@ sub process_support_files {
   
   push @{$p->{include_dirs}}, $p->{c_source};
   
   
   push @{$p->{include_dirs}}, $p->{c_source};
   

-  my $files = $self->rscan_dir($p->{c_source}, qr('\.c(pp)?$'));
+  my $files = $self->rscan_dir($p->{c_source}, file_qr('\.c(pp)?$'));

   foreach my $file (@$files) {
     push @{$p->{objects}}, $self->compile_c($file);
   }
   foreach my $file (@$files) {
     push @{$p->{objects}}, $self->compile_c($file);
   }