diff --git a/Basic/Makefile.PL b/Basic/Makefile.PL
index db9c922e8..907f462f3 100644
--- a/Basic/Makefile.PL
+++ b/Basic/Makefile.PL
@@ -126,7 +126,6 @@ sub init_PM {
     $pm->{ $plf->{$f} = _nopl($f) } = _nopl(delete $pm->{$f});
   }
   @pd_srcs = ::pdlpp_eumm_update_deep($self);
-  delete @$pm{grep /\.c$/, keys %$pm};
 }
 }
 
diff --git a/Basic/lib/PDL/Core/Dev.pm b/Basic/lib/PDL/Core/Dev.pm
index 3caf80d8e..bcbb101e6 100644
--- a/Basic/lib/PDL/Core/Dev.pm
+++ b/Basic/lib/PDL/Core/Dev.pm
@@ -212,6 +212,7 @@ sub pdlpp_eumm_update_deep {
     $eumm->{clean}{FILES} .= join ' ', '', $pmfile, map "\$($_)", @macro_vars;
     $eumm->{clean}{FILES} .= $EXTRAS{$f}{OBJECT} if $EXTRAS{$f}{OBJECT};
   }
+  delete @$pm{grep /\.c$/, keys %$pm};
   @pd_srcs;
 }
 
diff --git a/Libtmp/GSL/Makefile.PL b/Libtmp/GSL/Makefile.PL
index def3b2310..a50a696c0 100644
--- a/Libtmp/GSL/Makefile.PL
+++ b/Libtmp/GSL/Makefile.PL
@@ -46,8 +46,6 @@ undef &MY::init_PM; # suppress warning
   my ($self) = @_;
   $self->SUPER::init_PM;
   @pd_srcs = ::pdlpp_eumm_update_deep($self);
-  my ($pm) = @$self{qw(PM)};
-  delete @$pm{grep /\.c$/, keys %$pm};
 };
 
 undef &MY::postamble; # suppress warning