From 7e856060484c653b054726b1523a3ed3745e47ce Mon Sep 17 00:00:00 2001 From: Guillem Jover Date: Mon, 17 Dec 2012 17:30:24 +0100 Subject: Dpkg::Control::Hash: Fix set_options to take a hash instead of two scalars This fixes the function to behave as documented, and expected from the name itself. --- scripts/Dpkg/Control/Hash.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'scripts/Dpkg/Control') diff --git a/scripts/Dpkg/Control/Hash.pm b/scripts/Dpkg/Control/Hash.pm index 038ac539a..ed7587dbd 100644 --- a/scripts/Dpkg/Control/Hash.pm +++ b/scripts/Dpkg/Control/Hash.pm @@ -136,8 +136,8 @@ Changes the value of one or more options. =cut sub set_options { - my ($self, $k, $v) = @_; - $$self->{$k} = $v; + my ($self, %opts) = @_; + $$self->{$_} = $opts{$_} foreach keys %opts; } =item my $value = $c->get_option($option) -- cgit v1.2.3