pass the -p/-path correctly to the import engine

diff --git a/site/util/bsexlsprod.pl b/site/util/bsexlsprod.pl
index f9cc73deacc58070e60ae450d7dc66d7a6fc1de6..eead140047e008525332c2c5d58b40641de80290 100644 (file)
--- a/site/util/bsexlsprod.pl
+++ b/site/util/bsexlsprod.pl
@@ -7,6 +7,7 @@ use BSE::Cfg;
 use BSE::API qw(bse_init bse_cfg bse_make_product bse_encoding);
 use BSE::Importer;
 use Carp qw(confess);
+use Config;
 
 bse_init("../cgi-bin");
 
@@ -32,7 +33,7 @@ my $importer = BSE::Importer->new
   (
    cfg => $cfg,
    profile => $profile,
-   file_path => \@file_path,
+   file_path => join($Config{pathsep}, @file_path),
    callback => $callback,
   );