summaryrefslogtreecommitdiff
path: root/dh_elpa
diff options
context:
space:
mode:
Diffstat (limited to 'dh_elpa')
-rwxr-xr-xdh_elpa8
1 files changed, 5 insertions, 3 deletions
diff --git a/dh_elpa b/dh_elpa
index e396fc4..dec995e 100755
--- a/dh_elpa
+++ b/dh_elpa
@@ -78,14 +78,16 @@ sub doit_quietly {
sub read_package_desc {
my ($descdir, $package) = @_;
- my %desc = {};
+ my %desc = ();
my $descfile="${descdir}/${package}.desc";
- open my $fh,'<', $descfile or
+ my $fh;
+
+ open $fh,'<', $descfile or
error "failed to open $descfile";
- while (<DESC>) {
+ while (<$fh>) {
if (m/([^:]+):\s*(.*)\s*$/) {
$desc{$1} = $2;
}