From 54570330b51345438abd6f58bb3ff6f40818e504 Mon Sep 17 00:00:00 2001
From: Patrick Spek
Date: Sun, 15 Nov 2020 08:40:57 +0100
Subject: Bring the other sub in line too
---
lib/Hash/Merge.pm6 | 12 +++++++-----
1 file changed, 7 insertions(+), 5 deletions(-)
diff --git a/lib/Hash/Merge.pm6 b/lib/Hash/Merge.pm6
index 7bc5bab..8f41c07 100644
--- a/lib/Hash/Merge.pm6
+++ b/lib/Hash/Merge.pm6
@@ -6,19 +6,21 @@ unit module Hash::Merge;
#| Merge any number of Hashes together.
sub merge-hashes (
- *@hashes, #= Hashes to merge together
+ #| Any number of Hashes to merge together.
+ *@hashes,
+
--> Hash
) is export {
- my %merge-into = @hashes.shift;
+ my %result = @hashes.shift;
# Nothing to do if we only got 1 argument
- return %merge-into unless @hashes.elems;
+ return %result unless @hashes.elems;
for ^@hashes.elems {
- %merge-into = merge-hash(%merge-into, @hashes.shift);
+ %result = merge-hash(%result, @hashes.shift);
}
- %merge-into;
+ %result;
}
#| Merge two hashes together.
--
cgit v1.1