make [split] always return a list.

(shouldn't be necessary but definitely helps)
partcl · Apr 13, 2010 · 07b1f3f · 07b1f3f
1 parent 3fa5cd7
commit 07b1f3f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Partcl/commands/main.pm b/src/Partcl/commands/main.pm
@@ -754,7 +754,7 @@ our sub split(*@args) {
     my $splitChars := @args[1] // " \r\n\t";
 
     if $string eq '' {
-        return '';
+        return list();
     }
 
     if $splitChars eq '' {