forked from lix-project/lix
resolve-system-dependencies.pl: Simplify union impl
Patch by @pikajude
This commit is contained in:
parent
9155fbd386
commit
fef8c3a5ab
|
@ -42,14 +42,8 @@ sub mkset(@) {
|
||||||
|
|
||||||
sub union($$) {
|
sub union($$) {
|
||||||
my ($set1, $set2) = @_;
|
my ($set1, $set2) = @_;
|
||||||
my $new = {};
|
my %new = (%$set1, %$set2);
|
||||||
foreach my $key (keys %$set1) {
|
\%new
|
||||||
$new->{$key} = $set1->{$key};
|
|
||||||
}
|
|
||||||
foreach my $key (keys %$set2) {
|
|
||||||
$new->{$key} = $set2->{$key};
|
|
||||||
}
|
|
||||||
$new
|
|
||||||
}
|
}
|
||||||
|
|
||||||
sub cache_filepath($) {
|
sub cache_filepath($) {
|
||||||
|
|
Loading…
Reference in a new issue