Quick fix: default values in Export.pm

Updates #630
shawnlaffan · Jan 1, 2017 · 30ba5b4 · 30ba5b4
1 parent b786fca
commit 30ba5b4
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/lib/Biodiverse/GUI/Export.pm b/lib/Biodiverse/GUI/Export.pm
@@ -25,9 +25,9 @@ use 5.010;
 
 sub Run {
     my ($object, %args) = @_;
-
-    my $selected_format = $args{selected_format};
-    my $export_colours = $args{export_colours};
+    
+    my $selected_format = $args{selected_format} || '';
+    my $export_colours = $args{export_colours} || 0;
 
     #  sometimes we get called on non-objects,
     #  eg if nothing is highlighted