Chris/webperl
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Check for empty arrays in array join.

Browse Source
This commit is contained in:
Chris 2014-06-24 15:04:37 +01:00
parent 5f1b2f1972
commit 98b4d45a44
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Webperl/Utils.pm
View File

@ -380,6 +380,7 @@ sub join_complex {
} elsif(ref($value) eq "ARRAY") {
croak "join_complex not given a joinstr when joining an array" unless(defined($settings{"joinstr"}));
croak "join_complex not given any content when joining an array" unless(scalar(@{$value}));
return join($settings{"joinstr"}, @{$value});
} elsif(ref($value) eq "HASH") {