Correct init of hash in selected function
This commit is contained in:
@@ -103,7 +103,8 @@ sub get_${tablecontrol[0]} {
|
|||||||
my $c = shift;
|
my $c = shift;
|
||||||
my $selected = shift; #Parameter is name of selected row.
|
my $selected = shift; #Parameter is name of selected row.
|
||||||
my $is_new_record = shift; #Indicates new record required (defaults)
|
my $is_new_record = shift; #Indicates new record required (defaults)
|
||||||
my %ret = {};
|
my %ret = ();
|
||||||
|
#gather the values here
|
||||||
return %ret;
|
return %ret;
|
||||||
}
|
}
|
||||||
</tal:block>
|
</tal:block>
|
||||||
|
Reference in New Issue
Block a user