split [paths].libraries on the path sep

to allow more than one path to be added

diff --git a/site/cgi-bin/modules/BSE/CfgInfo.pm b/site/cgi-bin/modules/BSE/CfgInfo.pm
index f13d02a58776ab16083c4c383624d984f495261d..c996731bdfa9e7858232855a336a784d4d7ff5b6 100644 (file)
--- a/site/cgi-bin/modules/BSE/CfgInfo.pm
+++ b/site/cgi-bin/modules/BSE/CfgInfo.pm
@@ -1,11 +1,12 @@
 package BSE::CfgInfo;
 use strict;
+use Config;
 
-our $VERSION = "1.005";
+our $VERSION = "1.006";
 
 use vars qw(@ISA @EXPORT_OK);
-require Exporter;
-@ISA = qw(Exporter);
+use Exporter qw(import);
+
 @EXPORT_OK = qw(custom_class admin_base_url cfg_image_dir cfg_image_uri cfg_dist_image_uri cfg_data_dir cfg_scalecache_dir cfg_scalecache_uri credit_card_class product_options bse_default_country load_class);
 
 =head1 NAME
@@ -299,7 +300,7 @@ sub _do_local_inc {
 
   my $local_inc = $cfg->entryIfVar('paths', 'libraries');
 
-  unshift @INC, $local_inc if $local_inc;
+  unshift @INC, split /\Q$Config{path_sep}/, $local_inc if $local_inc;
 }
 
 1;