Correct init of hash in selected function

2025-06-13 16:14:32 +01:00 · 2025-06-13 16:14:32 +01:00 · 40e83a4bee
commit 40e83a4bee
parent 2d30d8b124
1 changed files with 4 additions and 3 deletions
--- a/Templates/custom.pm.tem
+++ b/Templates/custom.pm.tem
@ -103,7 +103,8 @@ sub get_${tablecontrol[0]} {
 		my $c = shift;
 		my $selected = shift; #Parameter is name of selected row.
 		my $is_new_record = shift; #Indicates new record required (defaults)
-		my %ret = {};
+		my %ret = ();
+		#gather the values here
 		return %ret;
 	}
 </tal:block>