#!/usr/bin/perl

use Debian::Debhelper::Dh_Lib;

init();

my $elpadir="/usr/share/emacs/site-lisp/elpa";

foreach my $package (@{$dh{DOPACKAGES}}) {

  my $tmp=tmpdir($package);
  my $file=pkgfile($package,"elpa");

  my @files;
  if ($file) {
    @files=filearray($file, ".");
  }
  if (($package eq $dh{FIRSTPACKAGE} || $dh{PARAMS_ALL})
      && @ARGV) {
    push @files, @ARGV;
  }

  if (scalar(@files) == 1) {
    $pkg_file=$files[0];
  } else {
    die("multifile packages unimplimented");
  }

  doit(qw{emacs -batch -Q -l package},
       '--eval',"(add-to-list 'package-directory-list \"$elpadir\")",
       qw{-f package-initialize -l dh-elpa.el},
       qw{-f dhelpa-batch-install-file}, "$tmp/$elpadir", $pkg_file);
}