diff --git a/Basic/lib/PDL/Core/Dev.pm b/Basic/lib/PDL/Core/Dev.pm
index bcbb101e6..b96a6d3ae 100644
--- a/Basic/lib/PDL/Core/Dev.pm
+++ b/Basic/lib/PDL/Core/Dev.pm
@@ -169,7 +169,7 @@ $install|
 
 sub pdlpp_postamble_int {
   my $w = whereami_any();
-  join '', map _postamble($w, 1, @$_[0..3], 1, @$_[4..$#$_]), @_;
+  join '', map _postamble($w, 1, @$_[0..3], 1, @$_[5..$#$_]), @_;
 }
 
 # This is the function to be used outside the PDL tree.
diff --git a/Libtmp/Slatec/Makefile.PL b/Libtmp/Slatec/Makefile.PL
index 1a7c36aff..facd70afa 100644
--- a/Libtmp/Slatec/Makefile.PL
+++ b/Libtmp/Slatec/Makefile.PL
@@ -44,7 +44,7 @@ if ($msg ne "") {
     return;
 }
 
-my @pack = (["slatec.pd", qw(Slatec PDL::Slatec)]);
+my @pack = (["slatec.pd", qw(Slatec PDL::Slatec), '', 1]);
 my @slatecfiles = map {s/\.f$//; $_} glob("slatec/*.f");
 my %hash = pdlpp_stdargs_int(@pack);