Upgrade to Encode 1.69.
[p5sagit/p5-mst-13.2.git] / ext / Encode / Encode / Makefile_PL.e2x
index 78cf91b..0e73823 100644 (file)
@@ -18,8 +18,8 @@ my %tables = (
 require File::Spec;
 my ($enc2xs, $encode_h) = ();
 PATHLOOP:
-for my $d (@Config{qw/bin sitebin vendorbin/},
-          (split /:/, $ENV{PATH})){
+for my $d (@Config{qw/bin sitebin vendorbin/}, 
+          (split /$Config{path_sep}/o, $ENV{PATH})){
     for my $f (qw/enc2xs enc2xs5.7.3/){
         my $path = File::Spec->catfile($d, $f);
         -x $path and $enc2xs = $path and last PATHLOOP;