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

[John E. Malmberg]

Andreas J. Koenig wrote:

On Sat, 29 Sep 2007 11:10:53 -0500, "John E. Malmberg" <[EMAIL PROTECTED]> said:

 >> Thanks, John.

>> >> I assume that in process_support_files() you meant file_qr('\.c(pp)?

 >> $') and not qr('\.c(pp)?$').

  > I must have missed that one, thanks.

Would it be possible to make a quick 31996 patch fixing this one?

Attached here.

-John
[EMAIL PROTECTED]
Personal Opinion Only



--- /rsync_root/perl/lib/Module/Build/Base.pm   Fri Sep 28 23:43:35 2007
+++ lib/Module/Build/Base.pm    Sat Sep 29 14:41:27 2007
@@ -2247,7 +2247,7 @@
   
   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);
   }