FS-8021 #resolve [filebug.pl allow comma separated component entry]

diff --git a/support-d/utils/filebug.pl b/support-d/utils/filebug.pl
index d3a40b7ae54e281858c8a5d8818b23e612bff380..6da941e733f5c44bc881c12df773554052c46776 100755 (executable)
--- a/support-d/utils/filebug.pl
+++ b/support-d/utils/filebug.pl
@@ -92,7 +92,11 @@ if ($opts{versions}) {
 }
 
 if ($opts{components}) {
-    $opts{components_array} = [map {{name => $_}} split(" ", $opts{components})];
+    if ($opts{components} =~ /,/) {
+       $opts{components_array} = [map {{name => $_}} split(" ", $opts{components})];
+    } else {
+       $opts{components_array} = [map {{name => $_}} split(" ", $opts{components})];
+    }
 } else {
     $opts{components_array} = [map {{name => $_}} ($default_components)];
     $opts{components} = $default_components;
@@ -169,7 +173,11 @@ if ($opts{askall}) {
     $opts{versions_array} = [map {{name => $_}} split(" ", $opts{versions})];
     $opts{summary} = getfield("Summary: ", $opts{summary});
     $opts{components} = getfield("Components: ", $opts{components});
-    $opts{components_array} = [map {{name => $_}} split(" ", $opts{components})];
+    if ($opts{components} =~ /,/) {
+       $opts{components_array} = [map {{name => $_}} split(",", $opts{components})];
+    } else {
+       $opts{components_array} = [map {{name => $_}} split(" ", $opts{components})];
+    }
     $opts{hash} = getfield("GIT Hash: ", $opts{hash});
 
     if ($opts{noedit}) {