From fef8c3a5ab2caaa24bc102984ae0436efd1f419e Mon Sep 17 00:00:00 2001 From: Shea Levy Date: Wed, 21 Oct 2015 18:18:03 -0400 Subject: [PATCH] resolve-system-dependencies.pl: Simplify union impl Patch by @pikajude --- scripts/resolve-system-dependencies.pl.in | 10 ++-------- 1 file changed, 2 insertions(+), 8 deletions(-) diff --git a/scripts/resolve-system-dependencies.pl.in b/scripts/resolve-system-dependencies.pl.in index 1294ebba5..23416b75c 100755 --- a/scripts/resolve-system-dependencies.pl.in +++ b/scripts/resolve-system-dependencies.pl.in @@ -42,14 +42,8 @@ sub mkset(@) { sub union($$) { my ($set1, $set2) = @_; - my $new = {}; - foreach my $key (keys %$set1) { - $new->{$key} = $set1->{$key}; - } - foreach my $key (keys %$set2) { - $new->{$key} = $set2->{$key}; - } - $new + my %new = (%$set1, %$set2); + \%new } sub cache_filepath($) {