Commit 534bd240 authored by Jessica Severin's avatar Jessica Severin
Browse files

added check in main::encode_hash to make sure value is defined

parent b2d385b4
......@@ -305,7 +305,9 @@ sub main::encode_hash
my $hash_string = "{";
my @keys = sort(keys %{$hash_ref});
foreach my $key (@keys) {
$hash_string .= "'$key'=>'" . $hash_ref->{$key} . "',";
if(defined($hash_ref->{$key})) {
$hash_string .= "'$key'=>'" . $hash_ref->{$key} . "',";
}
}
$hash_string .= "}";
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment