1 files changed, 14 insertions, 3 deletions
diff --git a/dh_elpa b/dh_elpa
index 3ca503e..b921cb9 100755
--- a/dh_elpa
+++ b/dh_elpa
@@ -76,6 +76,17 @@ sub doit_quietly {
 
 }
 
+# simplified version of private sub autoscript_sed in Dh_Lib
+sub sed_file {
+  my ($sed, $infile, $outfile) = @_;
+
+  open(IN, $infile) or die "$infile: $!";
+  open(OUT, ">>$outfile") or die "$outfile: $!";
+  while (<IN>) { $sed->(); print OUT }
+  close(OUT) or die "$outfile: $!";
+  close(IN) or die "$infile: $!";
+}
+
 sub read_package_desc {
   my ($descdir, $package) = @_;
   my %desc = ();
@@ -117,9 +128,9 @@ sub maybe_install_helper{
     my $elpaversion = $desc->{'ELPA-Version'} or
       error "elpa version not found";
 
-    Debian::Debhelper::Dh_Lib::autoscript_sed (sub {s/#ELPAPACKAGE#/$elpapackage/;
-						    s/#ELPAVERSION#/$elpaversion/; },
-					       "$templatedir/$piece", $target);
+    sed_file (sub {s/#ELPAPACKAGE#/$elpapackage/;
+		   s/#ELPAVERSION#/$elpaversion/; },
+	      "$templatedir/$piece", $target);
     chmod oct($mode), $target;
   }
 }