summaryrefslogtreecommitdiff
path: root/scripts/Dpkg/Control
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/Dpkg/Control')
-rw-r--r--scripts/Dpkg/Control/Hash.pm10
-rw-r--r--scripts/Dpkg/Control/Info.pm4
2 files changed, 7 insertions, 7 deletions
diff --git a/scripts/Dpkg/Control/Hash.pm b/scripts/Dpkg/Control/Hash.pm
index 38ed1edc7..6084d3a97 100644
--- a/scripts/Dpkg/Control/Hash.pm
+++ b/scripts/Dpkg/Control/Hash.pm
@@ -103,11 +103,11 @@ sub new {
# Object is a scalar reference and not a hash ref to avoid
# infinite recursion due to overloading hash-derefencing
my $self = \{
- 'in_order' => [],
- 'out_order' => [],
- 'allow_pgp' => 0,
- 'allow_duplicate' => 0,
- 'drop_empty' => 0,
+ in_order => [],
+ out_order => [],
+ allow_pgp => 0,
+ allow_duplicate => 0,
+ drop_empty => 0,
};
bless $self, $class;
diff --git a/scripts/Dpkg/Control/Info.pm b/scripts/Dpkg/Control/Info.pm
index e88bcb8f0..8e28446b0 100644
--- a/scripts/Dpkg/Control/Info.pm
+++ b/scripts/Dpkg/Control/Info.pm
@@ -55,8 +55,8 @@ sub new {
my ($this, $arg) = @_;
my $class = ref($this) || $this;
my $self = {
- 'source' => undef,
- 'packages' => [],
+ source => undef,
+ packages => [],
};
bless $self, $class;
if ($arg) {