From 2f6a76d78664b38ab98f8cde9d63c8f1dd592892 Mon Sep 17 00:00:00 2001
From: Nigel Horne <njh@bandsman.co.uk>
Date: Fri, 2 Aug 2024 13:11:57 -0400
Subject: [PATCH] Return more quickly

---
 gedcom | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/gedcom b/gedcom
index 51440cc..735ca42 100755
--- a/gedcom
+++ b/gedcom
@@ -13516,11 +13516,14 @@ sub get_params
 {
 	my $default = shift;
 
+	if(ref($_[0]) eq 'HASH') {
+		# %rc = %{$_[0]};
+		return $_[0];
+	}
+
 	my %rc;
 
-	if(ref($_[0]) eq 'HASH') {
-		%rc = %{$_[0]};
-	} elsif(scalar(@_) % 2 == 0) {
+	if(scalar(@_) % 2 == 0) {
 		%rc = @_;
 	} elsif(scalar(@_) == 1) {
 		if(defined($default)) {